
Schaekem
4 год назад
Создайте программу для вычисления стоимости покупки,состоящей из нескольких тетрадей, карандашей и линейки,если стоимость превышает200 руб. Вывести сообщение (баланс превышен).
ОТВЕТЫ

Aleksi Paavo
Oct 24, 2020
var
a,b,c,d:integer;
Begin
writeln('Введите цену тетради, карандаша и линейки соственно');
read(a,b,c);
d:=a+b+c;
if d>200 then writeln('Баланс превышен');
End.
a,b,c,d:integer;
Begin
writeln('Введите цену тетради, карандаша и линейки соственно');
read(a,b,c);
d:=a+b+c;
if d>200 then writeln('Баланс превышен');
End.
464
Смежные вопросы: