Написать программу которая введенные с клавиатуры отрицательные числа удваивает и прибавляет 5 а положительные оставляет без изменения

MuBuHa MuBuHa    3   12.06.2019 19:00    2

Ответы
Ozeplay Ozeplay  02.10.2020 00:42
Program zz;
var   a:integer;
begin 
readln(a); 
if a>0 then writeln(a)     
          else 
 begin 
 a:=a*2+5;   
writeln(a);     
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика