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.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
