//
Var x: integer;
Begin
Write('введите x=');
Readln(x);
if x>0 then
Write('положительное')
else
Write('не положительное');
End.
ТЕСТ 1
На уроке будем писать тест по параграфу 23. Почитайте еще раз учебник. Кто не принес на улучшение свою модель, то жду. В модели должно быть...
Комментариев нет:
Отправить комментарий