Паска-а-аль. Ввести с клавиатуры цену и кол-во товара. Найти стоимость покупки. Пишите!
program test;var x, y: real;begin write('Vvedite cenu tovara: '); readln(x); write('Vvedite kolichestvo tovara: '); readln(y); writeln('Stoimost pokupki = ', (x*y):0:2); readln();end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program test;
var x, y: real;
begin
write('Vvedite cenu tovara: ');
readln(x);
write('Vvedite kolichestvo tovara: ');
readln(y);
writeln('Stoimost pokupki = ', (x*y):0:2);
readln();
end.