Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Задача по программе паскаль.
В магазине купили a кг конфет по b руб. за килограмм и c кг печенья по d руб., за килограмм. Вычислите сумму покупки.

Ответ оставил Гость

Program prog;
uses crt;
var
a,b,c,s,d:real;
begin
write(a кг конфет = );
readln(a);
write(b руб. за килограмм = );
readln(b);
write(c  кг печенья = );
readln(c);
write(d руб. за килограмм = );
readln(d);

writeln;
s:=a*b+c*d;
writeln(Сумма покупки s = , s:0:2);

end.