Нужно сделать программу в Паскале через тип integer.

Задача: Составить программу, определяющию массу кирпича. P=1400 кг/м3, V=25*12*6.5

Формула для нахождения массы: m= V*P

V - объём

m - масса

P - плотность

1

Ответы и объяснения

Лучший Ответ!
2013-01-26T14:29:57+04:00

program noname;
uses crt;
var
V,m,P:integer;
begin
clrscr;
P:=1400;
V:=25*2*39; (чтобы резудьтат был в типе integer представим выражение типа real 25\cdot12\cdot6,5 как 25\cdot2\cdot6\cdot6,5=25\cdot2\cdot39)
m:=V*P;
writeln(m);
end.