Главная arrow icon Вопросы arrow icon Учеба и наука arrow icon Информатика arrow icon Помогите написать задачу по Borland Pascal

Помогите написать задачу по Borland Pascal - вопрос №478507

Задача

написать программу, которая определяет чётное число или нечётное( можно использовать команду mod)

Задача 2

Даны целые числа, написать программу с заменой положительных чисел Еденицей(1), а отрицательных чисел нулём(0)

Екатерина
27.11.12
Учеба и наука / Информатика
1 ответ
Пошагово
если можно

Ответы

Валентина

program z1;

var x:integer;

begin

  writeln('Vvedite chislo');

  readln(x);

  if x mod 2 = 0 then writeln('chetnoe')  else writeln('nechetnoe');

readln

end.

 

 
28.11.12

Еva
от 100 p.
Рейтинг: 121 998
6-й в Учебе и науке
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store
  • карты visa
  • карты master card
  • карты maestro
  • карты МИР
Мы используем файлы cookie. Пользуясь сайтом, вы принимаете условия нашего соглашения. Принять Детальнее