Кто в этом разбирается?Помогите пожалуйста
1. Составить линейный алгоритм и программу вычисления периметра прямоугольника, если заданы длины его сторон А и В. (Р=2•А+2•В).
2. Составить алгоритм и программу вычисления произведения и разности двух заданных чисел Р и В. (S=P•B, R=P-B).
3. Составить алгоритм и программу вычисления объёма куба, если задана длина его ребра В. (V=B•B•B).
4. Составить алгоритм и программу вычисления площади круга, если задан его радиус. (S=3.14•R•R).
5. Составить алгоритм и программу вычисления периметра треугольника, если заданы значения его сторон: А, В и С. (Р=А+В+С).
Pascal
1. var a, b: real;
begin
write(Введите стороны прямоугольника: );
read(a, b);
writeln(Периметр = , 2 * a + 2 * b);
end.
2. var p, b: real;
begin
write(Введите два числа: );
read(p, b);
writeln(Произведение = , p * b);
writeln(Разность = , p - b);
end.
3. var b: real;
begin
write(Введите длину ребра: );
read(b);
writeln(Объем = , b * b * b);
end.
4. var r: real;
begin
write(Введите радиус: );
read(r);
writeln(Площадь = , 3.14 * r * r);
end.
5. var a, b, c: real;
begin
write(Введите три стороны: );
read(a, b, c);
writeln(Периметр = , a + b + c);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
