Дано число n (вводиться с клавиатуры). Если это число больше 10, то увеличить его в 2 раза иначе уменьшить на 5 на pascal abc

Question

Спиридоний

5 февраля, 14:23

+2

Ответы (1)

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

Линыч · Answer 1

Program user;

uses crt;

var a, b: real;

begin

writeln ('введи число с клавиатуры') ;

readln (a) ;

If a>10 then b:=a*2 else b:=a-5;

end.