Написать программу в паскале: 1.удвоить заданное - вопрос №24863011 от AlexMYP 24.10.2022 05:25

Question

Информатика: Написать программу в паскале: 1.удвоить заданное число, если оно положительное, утроить его, если оно отрицательно, и увеличит его на 1, если оно равно нулю.

AlexMYP · Answer

Var a:real;beginreadln(a);if a 0 then a:=a*2;if a 0 then a:=a*3;if a=0 then a:=a+1;writeln(a)end....