Написать программу в паскале: 1.удвоить заданное - вопрос №24863011 от Секретик321321 07.02.2020 19:40

Question

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

Секретик321321 · 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....