Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и такого же количества обложек к ним. Программа должна запросить цену тетрадей, цену обложек, и их количество вывести стоимость покупки.
Program lol;
uses crt;
var
ct,co,sum:real;
ko,ky:integer;
begin
writeln(Введите кол-во терадей: );
read(ky);
writeln(Введите цену за 1 тетрадь: );
read(ct);
writeln(Введите кол-во обложек: );
read(ko);
writeln(Введите цену за 1 обложку:);
read(co);
sum:=(ky*ct)+(ko*co);
writeln(Стоимость покупки = , sum);
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.