Составте программу в pascal abc где необходимо - вопрос №7990837 от bhawk2017 02.06.2023 15:04

Question

Информатика: Составте программу в pascal abc где необходимо ввести некоторое целое число и, если оно чётное, уменьшить его в 2 раза

bhawk2017 · Answer

Var  a:integer;begin  write( a= );  readln(a);  if odd(a) then writeln(a/2:6:2);end....