ПОЧЕМУ ПОСТОЯННО ВЫВОДИТЬСЯ
(89) : Параметр цикла for в PascalABC.NET должен описываться в заголовке цикла
(94) : Параметр цикла for в PascalABC.NET должен описываться в заголовке цикла
(95) : Ошибка времени выполнения: Индекс выходит за границы массива

var a: array [1..100000] of integer;
var b : array [word] of string;
var g : array [1..100000] of integer ;
var h: real;
var k, i, n: integer;

begin
begin
k:=0;
i:=0;
n:=1;
h:=0;

writeln (Ответы вводяться строкой без пробелов. Пример: 12345);
b[1]:=1. Общество в широком смысле слова – это
1) территория обитания людей

2) история человечества
3) совокупность форм объединения людей
4) производительные силы;

b[2]:= 2. Обществознание – это
1) наука
2) учебная дисциплина
3) комплекс наук об обществе и человеке
4) сфера естественнонаучного знания
5) сфера гуманитарного знания;

b[3]:= 3. Человек отличается от животного наличием
1) языка
2) разума
3) сознанием
4) трудовой деятельности
5) мышления;
b[4]:= 4. Личность возможна (Определить неверный ответ)
1) без морали
2) без гражданственности
3) без ответственности
4) без диплома о высшем образовании;
b[5]:= 5. Человек и общество
1) человек первичен по отношению к обществу
2) общество первично по отношению к человеку
3) человек и общество взаимно обусловлены
4) общество и человек развиваются независимо друг от друга;
b[6]:= 6. Мораль в религии основывается
1) на разуме
2) на вере
3) на долге
4) на свободе;
b[7]:= 7. Целью развитой религии является достижение
1) материального благополучия
2) социального положения и значимости
3) спасение души
4) познание мира
5) управление силами природы;
b[8]:= 8. К монотеистическим религиям относятся
1) индуизм
2) ислам
3) буддизм
4) язычество;
b[9]:= 9. К основным моральным категориям относятся (определить неверный ответ)
1) добро
2) справедливость
3) совесть
4) выгода
5) любовь;
b[10]:= 10. Мораль проявляется в следовании
1) интересам власти
2) общественному мнению
3) анимизму
4) гороскопу
5) внутреннему «Я» человека;
b[11]:= 1. 3. 2 23. 3. 12345. 4. 4. 5. 3. 6. 2. 7. 3. 8. 23. 9. 4. 10. 5. ;


a[1]:=3;
a[2]:=23;
a[3]:=12345;
a[4]:=4;
a[5]:=3;
a[6]:=2;
a[7]:=3;
a[8]:=23;
a[9]:=4;
a[10]:=5;
end;
begin
for k:=1 to 10 do begin
writeln (b[k]);
readln (g[n]);
n:=n+1;
end;
for n:=1 to 100 do
if g[n]=a[i] then begin
h:=h+1;
i:=i+1;

end;

end;
writeln (h/2);

end.

Const n=10;
var a,g: array [1..100] of integer;
var b : array [1..100] of string;
var k: integer;

begin

writeln (Ответы вводятся строкой без пробелов. Пример: 12345);
b[1]:=1. Общество в широком смысле слова – это +NewLine+
1) территория обитания людей+NewLine+
2) история человечества+NewLine+
3) совокупность форм объединения людей+NewLine+
4) производительные силы;

b[2]:= 2. Обществознание – это +NewLine+
1) наука+NewLine+
2) учебная дисциплина+NewLine+
3) комплекс наук об обществе и человеке+NewLine+
4) сфера естественнонаучного знания+NewLine+
5) сфера гуманитарного знания;

b[3]:= 3. Человек отличается от животного наличием+NewLine+
1) языка+NewLine+
2) разума+NewLine+
3) сознанием+NewLine+
4) трудовой деятельности+NewLine+
5) мышления;

b[4]:= 4. Личность возможна (Определить неверный ответ)+NewLine+
1) без морали+NewLine+
2) без гражданственности+NewLine+
3) без ответственности+NewLine+
4) без диплома о высшем образовании;

b[5]:= 5. Человек и общество+NewLine+
1) человек первичен по отношению к обществу+NewLine+
2) общество первично по отношению к человеку+NewLine+
3) человек и общество взаимно обусловлены+NewLine+
4) общество и человек развиваются независимо друг от друга;

b[6]:= 6. Мораль в религии основывается+NewLine+
1) на разуме+NewLine+
2) на вере+NewLine+
3) на долге+NewLine+
4) на свободе;

b[7]:= 7. Целью развитой религии является достижение+NewLine+
1) материального благополучия+NewLine+
2) социального положения и значимости+NewLine+
3) спасение души+NewLine+
4) познание мира+NewLine+
5) управление силами природы;

b[8]:= 8. К монотеистическим религиям относятся+NewLine+
1) индуизм+NewLine+
2) ислам+NewLine+
3) буддизм+NewLine+
4) язычество;

b[9]:= 9. К основным моральным категориям относятся (определить неверный ответ)+NewLine+
1) добро+NewLine+
2) справедливость+NewLine+
3) совесть+NewLine+
4) выгода+NewLine+
5) любовь;

b[10]:= 10. Мораль проявляется в следовании+NewLine+
1) интересам власти+NewLine+
2) общественному мнению+NewLine+
3) анимизму+NewLine+
4) гороскопу+NewLine+
5) внутреннему «Я» человека;

a[1]:=3;
a[2]:=23;
a[3]:=12345;
a[4]:=4;
a[5]:=3;
a[6]:=2;
a[7]:=3;
a[8]:=23;
a[9]:=4;
a[10]:=5;

k:=0;
for var i:=1 to n do begin
 writeln(b[i]); 
 readln(g[i]);
 if g[i]=a[i] then k:=k+1;
end;
writeln (Ваша оценка: ,k/2);
end.