Форум АНТИЧАТ - Показать сообщение отдельно - Студентам с лабораторными сюда

Dosia
Да, данные считываются из файла и потом вписываются, таким вот образом:

Код:

var
R:integer;
   f1,f2:text;
begin
     assign(f1,'input.txt');
     assign(f2,'output.txt');
      reset(f1);
      rewrite(f2);
read(f1,R);
R:= R + 1 ;
writeln(f2,R*R+(R-1)*(R-1));
     close(f2);
     close(f1);
end.

По поводу неккоректно:

Цитата:

R = 3 N = 13

Условие:

Цитата:

....Пример ввода
2

Пример вывода
13

Обратите внимание на пример ввода.

Это давалось в задаче, отредактировал первый пост. Извините что сразу не вписал.

А программа должна работать на все числа до 15000, а она уже на 4 выдает неправильно, там вместо 41 должно быть 49. Посчитал вружную, попробуйте сами.

P.S Это не олимпиада, а онлайн контестер, в нем пишется таким образом стандартно.