Предмет:
ИнформатикаАвтор:
анонимvar a: longint;
begin write ( \'Введите число: \' ); readln ( a ); if a = 0 then writeln ( \'Данное число равно нулю.\' ); if a > 0 then writeln ( \'Число \', a, \' является положительным.\' ); if a < 0 then writeln ( \'Число \', a, \' является отрицательным.\' );end.
Автор:
pookie63Добавить свой ответ
Помогите пожалуйста написать " размышления над прочитаной книгой" ( книга любая) Содержание должно быть таким .
Предмет:
ЛитератураАвтор:
Anna155Ответов:
Смотреть
Предмет:
ИнформатикаАвтор:
анонимОтветов:
Смотреть
Предмет:
МатематикаАвтор:
aidenmooreОтветов:
Смотреть
Предмет:
Другие предметыАвтор:
carolinaim9mОтветов:
Смотреть