Question

Дано число А если число двухзначное, тоА=А*2 иначе А=А*3

Answer 1

Ответ:

На Pascal

program a;

var a:integer;

begin

readln (a);

if (a>=10) and (a<=99) then

writeln (a:=a*2);

else

writeln (a:=a*3);

end.