С клавиатуры вводятся целые числа a,b и c. Если (a+с)*b меньше, чем 100-а, тогда выведите a-с, в противном случае напечатайте b+2*a.
С клавиатуры вводятся целые числа a,b и c. Если (a+с)*b меньше, чем 100-а, тогда выведите a-с, в противном случае напечатайте b+2*a.
Гость
Ответ(ы) на вопрос:
Гостьvar
a,b,c:integer;
begin
writeln('vvedite 3 chisla');
readln(a,b,c);
if ((a+b)*c) < (100-a) then
writeln(a-c) else
writeln(b+2*a);
readln
end.
ГостьВроде так
var a,b,c:integer;begin readln(a,b,c); if ((a+b)*c)<(100-a) then writeln(a-c) else writeln(b+2*a);end.
Не нашли ответ?
Похожие вопросы