Вопрос по информатике:
1.Дана длина ребра куба a. Найдите объем куба V=a3 и площадь его поверхности S=6∗a2
2.Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V=a∗b∗c и площадь поверхности S=2∗(a∗b+b∗c+a∗c).
3.Даны три числа a, b и c.Найдите их произведение.
4.Даны три числа a, b и c.Найдите их произведение.
Pascal
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 15.01.2018 21:14
- Информатика
- remove_red_eye 4953
- thumb_up 34
Ответы и объяснения 1
program cube;
var a,s,v:real;
begin;
write('Введите длину ребра куба: ');
read(a);
v:=power(a,3);
s:=6*sqr(a);
write('Площадь равна ',s,', а объём равен ',v,'.');
end.
Второе задание:
program par;
var a,b,c,s,v:real;
begin;
write('Введите стороны a,b,c: ');
read(a,b,c);
v:=a*b*c;
s:=2*(a*b+b*c+a*c);
write('Площадь равна ',s,', а объём равен ',v,'.');
end.
Третье и четвёртое задания:
program mult;
var r,a,b,c:real;
begin;
write('Введите три числа: ');
read(a,b,c);
r:=a*b*c;
write('Произведение чисел равно ',r);
end.
- 16.01.2018 01:10
- thumb_up 7
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.