Pascal ABC Составьте программу нахождения объёма прямоугольного параллелепипеда со сторонами a,b,c. Формула объёма V=abc. Значения переменных a,b,c введите с клавиатуры. Пример ввода: 3 4 5 Пример вывода: Объём = 60
Pascal ABC Составьте программу нахождения объёма прямоугольного параллелепипеда со сторонами a,b,c. Формула объёма V=abc. Значения переменных a,b,c введите с клавиатуры. Пример ввода: 3 4 5 Пример вывода: Объём = 60
Гость
Ответ(ы) на вопрос:
ГостьProgram Program1;
Var
a,b,c,v:real;
begin
write('Введите значение стороны A: ');
readln(a);
write('Введите значение стороны B: ');
readln(b);
write('Введите значение стороны C: ');
readln(c);
v:=a*b*c;
writeln('Объём = '+floattostr(v));
end.
Не нашли ответ?
Похожие вопросы