Задача.
Для данного N составить алгоритм вычисления значения выражения:

• Бейсик
  REM Вычислить сумму
  INPUT "Введи N="; N
  S=0
  FOR I=1 TO N
  S=S+SQR\(I\)
  NEXT I
  PRINT "Сумма равна", S
  END
  Паскаль
  program zadacha \(input, output\);
  {вычисление суммы}
  var
  n,i:integer;
  s:real;
  begin
  writeln \(‘введите натуральное число N’\);
  readln\(n\);
  s:=0;
  for i:=1 to n do s:=s+sqrt\(i\);
  writeln \(‘сумма=‘, s\)
  end.
• Бейсик
  REM Вычислить сумму
  INPUT "Введи N="; N
  S=0
  FOR I=1 TO N
  S=SQR\(I\)
  NEXT I
  PRINT "Сумма равна", S
  END
  Паскаль
  program zadacha \(input, output\);
  {вычисление суммы}
  var
  n,i:integer;
  s:real;
  begin
  writeln \(‘введите натуральное число N’\);
  readln\(n\);
  s:=0;
  for i:=1 to n do s:=sqrt\(i\);
  writeln \(‘сумма=‘, s\)
  end.