Составить программу удваивающую значение переменной, - вопрос №915924851 от Anastasiya2108 29.10.2022 18:38

Question

Информатика: Составить программу удваивающую значение переменной, а, если а 5, a =1 и утраивающую значение, а, если 1

Anastasiya2108 · Answer

Program Z1;Var a,b:integer;Begin Readln (a);If ((a 5) or (a =1)) then a:=a*2;If (1writeln (a);End....

Составить программу удваивающую значение переменной, а, если а> 5, a< =1 и утраивающую значение, а, если 1