Написать программу у pascal


Написать программу у pascal

ler22kya ler22kya    1   09.02.2022 17:08    1

Ответы
liza0281 liza0281  09.02.2022 17:10

var

x,y:integer;

begin

read(x);

if x<=0 then

writeln('y=', x+20)

else

writeln('y=', x*20);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика