Даны 2 фигуры. Квадрат со стороной a и прямоугольник со сторонами b c.Выяснить, какая из фигур имеет больший периметр. Ответ дайте в текстовой форме. Программа Паскаль. Написать программу.
Answers & Comments
руссич
Квадрат, фотку из программы паскаль прикрипила к ответу
0 votes Thanks 0
igroman95
Вот. Все вариантв учел.program pr;var a,b,c,p1,p2:integer;beginwrite('Введите сторону квадрата: ');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
1 votes Thanks 2
igroman95
if p1else writeln('Периметры фигур одинаковые'); end.
Answers & Comments
end.