Программу в Pascal Составить программу Задача: Дано - вопрос №184983490 от ZAKHARRROVA20001 24.06.2022 11:57

Question

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

ZAKHARRROVA20001 · 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);