Дано число n (вводиться с клавиатуры). Если это число больше 10, то увеличить его в 2 раза иначе уменьшить на 5 на pascal abc
Program user;uses crt;var a, b: real;beginwriteln('введи число с клавиатуры');readln(a);If a>10 then b:=a*2 else b:=a-5;end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Program user;
uses crt;
var a, b: real;
begin
writeln('введи число с клавиатуры');
readln(a);
If a>10 then b:=a*2 else b:=a-5;
end.