НА пример:
var
a,b:=integer
begin
writeln('Введите число а');
read(a);
writeln('Введите число b');
read(b);
end.
Получается, что writeln Выводит на экран, что ты ввёл/ввела в скобках.
9 90.............,,,,,,,,,,,,,
var
a, b, c: real;
begin
Write('Введите первую стороны => ');
readLn(a, b, c);
writeln('Периметр треугольника равен ', a + b + c);
end.
Объяснение:
это можно сделать с помощью теоремы Пифагора
===== PascalABC.NET =====
begin
var a := MatrRandom(6, 6, -20, 20);
a.Println(4);
a.ElementsByRow
.GroupBy(p -> p)
.Where(p -> p.Count > 1)
.MaxBy(p-> p.Key)
.Distinct
.Println
end.