Пожалуйста помогите по информатике:Написать программу на языке Паскаль:(1)Заданы стороны
Пожалуйста помогите по информатике:
Написать программку на языке Паскаль:
(1)Заданы стороны прямоугольника. Найти периметр и площадь прямоугольника.
(2) Написать программку которая находит среднее арифметическое двух чисел.
Пожалуйста если ещё не тяжело разъяснить а то до меня не доходит как это делают...
Заблаговременно спасибо!
1)
program qq;
var a,b,s,p : integer;
begin
writeln('Введите стороны прямоугольника');
read(a,b);
s:=a*b;
p:=2*(a+b);
writeln('Площадь прямоугольника одинакова ',s);
writeln('Периметр прямоугольника равен ',p);
end.
2)
Var a,b : Real;
Function SrAr(aa,bb :Real) : Real;
Begin
SrAr:=(aa+bb)/2;
end;
Begin
Readln(a,b);
Writeln(SrAr(a,b));
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.