что не так ? Lazarus

[AMX 777]

program project1;
var a,b,c:integer;
number:integer;
function sqrt(number:integer):integer;
begin

write('a=');
readln(a);
write('b=');
readln(b);
number:=a*a+b*b;
c:=sqrt(number);
Writeln('c=',c);
end.

[Аватар]

Не так все: начиная с Lozarus и заканчивая "кодом"

[AMX 777]

нужно правильно записать все а алгоритм правелен

[Serge_Bliznykov]

Сообщение от Аватар

начиная с Lozarus

я зря исправил ошибку в названии темы?

[evg_m]

нужно правильно записать все а алгоритм правелен

мы и не спорим, вот только нам ЭТОТ алгоритм неизвестен.

[digitalis]

Не сачкуйте, уважаемые гуру, включите телепаторы и протелепайте искомый алгоритм, тем более что он правелен.
https://cloud.mail.ru/public/A1pR/7adCJai1o

[Black Fregat]

Сообщение от digitalis

включите телепаторы

А чего там телепировать - длина вектора же!

[Аватар]

Скорее длина гипотенузы прямоугольного треугольника. Явно же школьник, он и слово-то вектор навряд-ли знает ))