программа на паскале.ввести число,если оно больше 0 разделить его на 2,если меньше или равно то умножить на 5

Ответ

Автор - Nomanoma

var x:real;
begin
read(x);
if x>0 then x:=x/2 else
x:=x*5;
write(x);
end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.