Question

Вывести квадраты чисел от 1 до N.
В ПАСКАЛЕ написать программу (НЕ ИСПОЛЬЗУЯ for)

Answer 1

1)
// PascalABC.NET 3.3

begin
  var n:=ReadInteger('n =');
  Range(1,n).Select(i->i*i).Println;
end.

Пример:
n = 5
1 4 9 16 25

2)
var n,i: integer;
begin
write('N = ');
readln(n);
i:=0;
while (i<n) do
 begin
 i:=i+1;
 write(i*i,' ');
 end;
end.

3)
var n,i: integer;
begin 
write('N = ');
readln(n); 
i:=0; 
repeat
 i:=i+1;
 write(i*i,' '); 
until i=n;
end.

Пример:
N = 5
1 4 9 16 25

Answer 2

А и не надо программу менять. Кстати, её составляет каждая школа самостоятельно. Более того, бывает, что и в одной школе два учителя информатики и каждый дает своё, вплоть до разных языков программирования!

Answer 3

И даже тут были школьники, которые бросили учить то, что им в школе давали и начали писать на другой версии Паскаля. и, кстати, благополучно перешли уже в следующий класс. Так что все зависит лишь от желания.

Answer 4

Вы, наверное, рассуждаете о школах с уклоном на Айти и ИКТ, а вот в обычных школах основываются на обычную программу ФГОС

Answer 5

Вы понять одного не можете/не хотите: во ФГОС не прописано, какой язык программирования изучать. И уж тем более, не указано, какой именно диалект того или иного языка.

Answer 6

Откройте ФГОС и убедитесь.