Задание
Задача.
Составить алгоритм вычисления суммы квадратов целых четных чисел от 0 до N.
Выберите ответ.
- program zadacha \(input, output\);
{вычисление квадратов целых четных чисел}
var
i,y,n:integer;
begin
writeln \(‘введите натуральное число N’\);
readln\(n\);
i:=0;
while i<=n do begin
y:=у+i;
writeln \(‘при i=‘, i, ‘ y=‘, y\);
i:=i+2 end;
end. - program zadacha \(input, output\);
{вычисление квадратов целых четных чисел}
var
i,y,n: integer;
begin
writeln \(‘введите натуральное число N’\);
readln\(n\);
i:=0;
while i<=n do begin
y:=i*i;
writeln \(‘при i=‘, i, ‘ y=‘, y\);
i:=i+2
end;
end.