С клавиатуры вводится число. Если оно четное, то его нужно удвоить, а если нечетное - утроить. В паскале.

Var n: integer;
begin
  read(n);
  if (n mod 2 ) = 0 then n:=n*2
  else n:=n*3;
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку