Напишите, пожалуйста программу для задачи о прямоугольнике: Даны 2 стороны прямоугольника a и b. Найти его периметр и площадь. (Язык программирования
5-9 класс
|
Pascal).
var
a,b,p,s:real;
begin
writeln('введите стороны прямоугольника');
read(a,b);
s:=a*b;
p:=2*(a+b);
writeln('площадь прямоугольника равна: ',s);
writeln('периметр прямоугольника равен: ',p)
end.
Другие вопросы из категории
Begin
Dat[1] := 16;
Dat[2] := 20;
Dat[3] := 20;
Dat[4] := 41;
Dat[5] := 14;
Dat[6] := 21;
Dat[7] := 28;
Dat[8] := 12;
Dat[9] := 15;
Dat[10] := 35;
m := 0;
for k := 1 to 10 do
if Dat[k]>m then
begin
m := Dat[k]
end;
writeln(m);
End.
с пояснениями, пожалуйста!
Читайте также
1)Найти наибольшее среди 2 чисел
2)Для чисел a,b,c,d вывести на экран полусумму наибольшего и наименьшего из них.
Напишите пожалуйста программы для этих задач.
Напишите пожалуйста программу для паскаля
ПРОШУ ВАС!)
типа. Ввод организуйе без использования цикла 2) разработайте алгоритм для ввода в память ЭВМ одномерного массива С состоященр из 7 элементов целого тип. Ввод организуйе с исползованием цикла "ДЛЯ". 3) разработайте алгоритм для ввода в память ЭВМ одномерного массива Д состоящего из 10 элементов целого типа. Каждый элемнт вычислите по формуле: значение элемента равно квадрату его индекса
нельзя, найти сумму
Напишите пожалуйста программу для Паскаля