ENG  RUSTimus Online Judge
Online Judge
Задачи
Авторы
Соревнования
О системе
Часто задаваемые вопросы
Новости сайта
Форум
Ссылки
Архив задач
Отправить на проверку
Состояние проверки
Руководство
Регистрация
Исправить данные
Рейтинг авторов
Текущее соревнование
Расписание
Прошедшие соревнования
Правила
вернуться в форум

Обсуждение задачи 1001. Обратный корень

why wrong answer? Pascal version
Послано pizza_hunter 10 мар 2019 13:20
This is my code
-----------------------------------------
var
  j,i: longint;
  a: array[1..100000000] of real;
begin
  i:=1;
  while not EOF do
  begin
    read(a[i]);
    i:=i+1;
  end;
  for j:=i-1 downto 1 do
    writeln(sqrt(a[j]):0:4);
end.
-----------------------------------------

Why is it wrong? can anyone please explain? thanks a lot

Edited by author 10.03.2019 13:21