Склавиатуры вводятся целые числа a,b и c. если (a+с)*b меньше, чем 100-а, тогда выведите a-с, в противном случае напечатайте b+2*a.

Meager36655 Meager36655    2   15.08.2019 01:50    0

Ответы
vylko777Leybe vylko777Leybe  14.08.2020 14:22
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.
ПОКАЗАТЬ ОТВЕТЫ
shmakovaangeli shmakovaangeli  14.08.2020 14:22
Вроде так
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика