Написать программу нахождения объёма и площади поверности прямоугольного параллелепипеда
5-9 класс
|
program superprogram;
var
a,b,c,d,m:integer;
begin
writeln ('Введите стороны a,b,c отделяя их пробелом');
readln (a,b,c);
d:=a*b*c;
writeln ('Объём - ', d);
m:=2*(a*b+ b*c+ a*c);
writeln ('Площадь поверхности -', m);
end.
Другие вопросы из категории
ввести два числа, найти квадрат наибольшего и извлечь квадрат наименьшего
энциклопедии?Обоснуйте свои ответы.
Читайте также
1. Написать программу нахождения произведения n чисел.
арифметического полученных значений.
2. За весну Обломов похудел на p1 кг, за лето поправился на p2 кг, за осень похудел на p3 кг, за зиму поправился на p4 кг. Написать программу, определяющую, похудел или поправился за год Обломов.
3. Написать программу, которая определяет, является ли целое число четным двузначным числом.
4. Даны коэффициенты квадратного уравнения. Написать программу, определяющую его корни
a,b,c введите с клавиатуры.
Пример ввода:
3 4 5
Пример вывода:
Объём = 60
программу которая вставит между буквами веденного слова пробелы 3)написать программу вывода на экран деление двух чисел
расположденных по диагонали
3.Написать программу рисующую горизонтальную цепочку из 12 кругов,каждый круг должен на половину закрывать предыдущий
Помогите,а то сижу с паскалем уже час с лишним и все никак не получается..
Заранее спасибо)