Задание № 1 по дисциплине «Информатика»



style="display:block"
data-ad-client="ca-pub-0562610021414947"
data-ad-slot="5792664354"
data-ad-format="link">

Бетонная плита длиной L м, шириной B м имеет массу M т. Определить плотность бетона.
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils;
var l,b,h,m,p,v:real;
begin
writeln ('vvedite dliny plity');
readln (l);
writeln ('vvedite shiriny');
readln (b);
writeln ('vvedite visaty');
readln (h);
writeln ('vvedite massy');
readln (m);
v:=l*b*h; //площадь
p:=m/v; // плотность
writeln (p:2:2);
readln;
end.

Популярность: 1% [?]

Метки:на delphi

Связанные записи

Рубрика: ЮУПИ · Метки:

Выразите свои мысли

Скажите нам, что вы думаете...
и если вы хотите сопроводить комментарий своей аватаркой, воспользуйтесь сервисом gravatar!