Question

Нужно сделать программу в Паскале через тип integer. Задача: Составить программу, определяющию массу кирпича. P=1400 кг/м3, V=25*12*6.5Формула для нахождения массы: m= V*PV - объёмm - масса P - плотность

Answer 1

program noname;
uses crt;
var
V,m,P:integer;
begin
clrscr;
P:=1400;
V:=25*2*39;
m:=V*P;
writeln(m);
end.