Question

составьте блок-схему и программу решения следующей задачи.Магазин продаёт B машин по цене A p. за каждую.Найдите общую выручку от продажи этих машин.

Answer 1

Program n1;
Uses Crt;
var  k,m,s: integer;
begin
 write('Vvedi kol-vo prodanih avto: ');
 Read(k); 
write('Vvedi cenu za 1 avto: '); 
Read(m);
 s:=m*k;
 writeln('Viruchka za avto: ',s);
end.