B) ввести число. если его модуль больше 7, уменьшить число в 1,5 раза, в противном случае увеличить в 7 раз.

Krasotcakotik Krasotcakotik    1   18.09.2019 04:10    0

Ответы
Evelynimmortal Evelynimmortal  07.10.2020 23:13
Var n:real;
 begin
 readln(n);
if abs(n)>7 then begin
n:=n/1.5;
end else begin
n:=7*n;
end;
writeln(n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика