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

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

Question

Петрина

30 августа, 22:27

+4

Ответы (1)

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

Лекса · Answer 1

Program 123;

var x:integer;

begin

readln (x) ;

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

writeln (x) ;

end.

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