Question

1) Задано положительное число A. Найти сумм всех четных чисел в интервале от 1 до A. Число А может иметь дробную часть.
2) Задано целое положительное число А и В. Найти квадратные корни целых чисел в интервале от А до В. Замечание: A<B

Answer 1

Готово .....................
UPD.изменил, теперь можно и не целые "а"

bbe6cd6c52cfce6d0ca88e35cd272389.pas

0937f84fcdd9c180e4d4bd47bf302a58.pas

Answer 2

Спасибо)

Answer 3

1. a:= round(a);
s:=0;
for i:=1 to a do
if i mod 2=0 then s:=s+i;
2. for i:=a to b do
writeln(sqrt(i));

bbe6cd6c52cfce6d0ca88e35cd272389.pas

0937f84fcdd9c180e4d4bd47bf302a58.pas