Дано целое число написать программу выводящую ноль если число меньше нуля или без изменений если больше нуля
Дано целое число написать программу выводящую ноль если число меньше нуля или без изменений если больше нуля
Гость
Ответ(ы) на вопрос:
Гостьvar n:integer;
begin
write('Введите целое число: ');
readln(n);
if n<0 then n:=0;
writeln(n);
end.
Не нашли ответ?
Похожие вопросы