В торговом центре продаются яблоки. Известно, что при покупке свыше 2 килограммов покупатель получает скидку в 20% на все остальные покупаемые им яблоки. В среде программирования разработайте программу, которая вычисляет итоговую стоимость X кг яблок с учётом скидки. Вычислите с помощью программы итоговую стоимость 5 кг яблок, если цена 1 кг яблок равна 80 руб. НУЖНО В ПАСКАЛЕ!!! ПлиИиИиИииЗ

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.