Регистрация
risj83risj
25.02.2023 00:24
Информатика
Есть ответ 👍

Составить алгоритм решения примера, чтобы внести его в программу «pascalabc».

186
437
Посмотреть ответы 1

Ответы на вопрос:

saya8282
saya8282
4,5(96 оценок)
Program pryamougolnik; var x1, x2, y1, y2, a, b, s, p: real; begin write ('введите координату х1 = '); readln (x1); write ('введите координату y1 = '); readln (y1); write ('введите координату х2 = '); readln (x2); write ('введите координату y2 = '); readln (y2); a: =abs(x2-x1); b: =abs(y2-y1); p: =(a+b)*2; s: =a*b; writeln ('периметр прямоугольника p = ', p); writeln ('площадь прямоугольника s = ', s); end.

Популярно: Информатика