Программу в Pascal Составить программу Задача: Дано - вопрос №18497447 от kristinakarpen 14.12.2022 17:42

Question

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

kristinakarpen · Answer

program a;var a:integer;beginreadln(a);if a 0 then a:= a-8;else a:=a+6;writeln (a);end.Объяснение:...

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

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