/
spirzen
/
it-code-examples
Обзор
Документация
Войти
/
spirzen
/
it-code-examples
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
examples/pascal/pascal-516-3-001/main.pas
15 строк
194 B
Spirzen
Code migration pack
09 июн 2026, 01:41
09 июн 2026, 01:41
cebc284
Код
Авторство
О чём код?
program Example; uses Math, SysUtils; var x, y: Integer; result: Real; begin x := 5; y := 10; result := Sqrt(x * x + y * y); WriteLn('Гипотенуза: ', result:0:2); end.