var
n:real;
begin
readln (n);
n:=n*sqrt (2);
writeln (n);
end.
Если число оканчивается на ноль или пять,то оно кратно 5.
Так что,если в числе N на конце стоит 0 или 5,то сумма его цифр кратна 5.
<span>HTML (Hyper Text Markup Language) - язык разметки гипертекста :)
</span>
Какая размерность массива? А вообще просто строишь цикл
for i:= 1 to N do
a[i]:= a[i] + 25;