Question

Даны 2 фигуры. Квадрат со стороной a и прямоугольник со сторонами b c.Выяснить, какая из фигур имеет больший периметр. Ответ дайте в текстовой форме.
Программа Паскаль. Написать программу.

Answer 1

квадрат, фотку из программы паскаль прикрипила к ответу

Answer 2

Вот. Все вариантв учел. program pr; var a,b,c,p1,p2:integer; begin write('Введите сторону квадрата: '); readln(a); write('Введите 1 сторону прямоуг.: '); readln(b); write('Введите 2 сторону прямоуг.: '); readln(c); p1:=4*a; p2:=b+b+c+c; if p1>p2 then writeln('Плошадь квадрата больше') else if p1

Answer 3

программа не вставилась полностью. секунду.

Answer 4

if p1else writeln('Периметры фигур одинаковые');
end.

Answer 5

глючит. Копец.