Программу в Pascal Составить программу Задача:
Дано число А если А больше 0 то уменьшить на 8 иначе увеличить на 6.
Например :
readln(a);
if a > 0 then a := a + 1;
writeln(a);

Зачемжежить Зачемжежить    1   12.05.2021 14:52    0

Ответы
mement0m0ri mement0m0ri  11.06.2021 14:53

program a;

var a:integer;

begin

readln(a);

if a > 0 then a:= a-8;

else a:=a+6;

writeln (a);

end.

Объяснение:

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