Составьте программу в паскаль абц

Увеличить число в 5 раз, если оно больше 3, во всех остальных случаях без изменения.

Question

Димаха

4 августа, 19:25

+3

Ответы (1)

Знаешь ответ?

Борюся · Answer 1

Program 123;

var x:integer;

begin

readln (x);

if x>3 then x:=x*5;

writeln (x);

end.

Составьте программу в паскаль абцУвеличить число в 5 раз, если оно больше 3, во всех остальных случаях без изменения.