Программу в Pascal Составить программу
Задача:
Дано число А если А больше 0 то уменьшить на 8 иначе увеличить на 6.
Например :
readln(a);
if a > 0 then a := a + 1;
writeln(a);
Ответы
Ответ дал:
1
Ответ:
program a;
var a:integer;
begin
readln(a);
if a > 0 then a:= a-8;
else a:=a+6;
writeln (a);
end.
Объяснение:
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад