3. Дана сторона квадрата a. Найдите его периметр P=4∗a и площадь S=a2. программа Паскаль
3. Дана сторона квадрата a. Найдите его периметр P=4∗a и площадь S=a2.
программа Паскаль
Гость
Ответ(ы) на вопрос:
Гостьuses GraphABC;
var
s, p, a: integer;
begin
read(a); //спрашиваем сторону квадрата
p := 4 * a;
s := sqr(a);
print('Периметр квадрата: ' + p + '. Площадь квадрата: ' + s + '.');
end.
Гостьprogram lol;
var a;b;c:integer;
begin
read(A);
b:=4*a;
c:=a*a;
writeln('Периметр=',b);
writeln('Площадь='C);
end.
Не нашли ответ?
Похожие вопросы