Предмет: Информатика,
автор: nikyusupov
В торговом центре продаются яблоки. Известно, что при покупке свыше 2 килограммов покупатель получает скидку в 20% на все остальные покупаемые им яблоки. В среде программирования разработайте программу, которая вычисляет итоговую стоимость X кг яблок с учётом скидки. Вычислите с помощью программы итоговую стоимость 5 кг яблок, если цена 1 кг яблок равна 80 руб. НУЖНО В ПАСКАЛЕ!!! ПлиИиИиИииЗ
Ответы
Автор ответа:
3
program abc;
var a,b,c:integer;
begin
writeln('Введите количество килограмм');
read(a);
b=80;
If a>=2 them c:=a*b*(20/100)
else c:=a*b;
writeln('Стоимость яблок равна',c);
end;
end.
var a,b,c:integer;
begin
writeln('Введите количество килограмм');
read(a);
b=80;
If a>=2 them c:=a*b*(20/100)
else c:=a*b;
writeln('Стоимость яблок равна',c);
end;
end.
Похожие вопросы
Предмет: Информатика,
автор: sestrichkitv97
Предмет: География,
автор: belizaveta25
Предмет: Химия,
автор: bajmenovarania
Предмет: Математика,
автор: AliceSib
Предмет: Математика,
автор: нупипецк