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

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

Question

Витеша

15 января, 11:29

+1

Ответы (1)

Знаете ответ на вопрос?

Касиния · Answer 1

Program 123;

var x:integer;

begin

readln (x) ;

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

writeln (x) ;

end.

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