Помогите пожалуйста решить!!!! Во дворце 40 залов. Известны длина, ширина и высота каждого зала. Вычислить площадь пола и объем каждого зала.
Помогите пожалуйста решить!!!! Во дворце 40 залов. Известны длина, ширина и высота каждого зала. Вычислить площадь пола и объем каждого зала.
Гость
Ответ(ы) на вопрос:
ГостьProgram 1; Var i, dlina, shirina, visota, N, S, V : Integer;
BEGIN
WriteLn(’Введите число залов‘);
ReadLn (N);
for i:=1 to N do begin
WriteLn(’Введите длину,ширину и высоту зала‘);
ReadLn (dlina, shirina, visota);
S:=dlina*shirina;
V:=S*visota;
WriteLn(‘Площадь пола=’,S,’ Объем зала=‘,V);
end
END. если это 8-9 класс, то должно быть так)))
Не нашли ответ?
Похожие вопросы