Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 09:00
764
Помогите найти ошибку в кодеvar a,b,c,d,f,k,h:integer;
begin
wtiteln('В каком веке было введено право городов избирать органы власти?');
wtiteln('в 11-12 веках');
wtiteln('1.В 13 веке');
wtiteln('2. в 11-12 веках');
wtiteln('3.в 5 веке');
readln(a);
if a=2 then writeln ('молодец!');
k:=k+1;
end
writeln('на ком основывалась светская власть в Средневековье?');
writeln('короли');
writeln('1.короли');
writeln('2. Церковь');
writeln('3. Крестьяне');
readln(b);
if b=1 then writeln ('молодец!');
k:=k+1
end.
else wtiteln('Неправильно');
wtiteln('какую власть имел орден св.Доминика?');
wtiteln('преследовать еретиков');
wtiteln('1.не подчинятся церкви ');
wtiteln('2. преследовать еретиков');
wtiteln('3. вести завоевательные походы');
readln(c);
if c=2 then writeln ('молодец!');
k:=k+1
end.
else wtiteln('Неправильно');
wtiteln('какие государства были образованы на завоеванных территориях во время крестовых походов?');
wtiteln(' Иерусалимское королевство, Княжество Антиохия');
wtiteln('1.Финикия ');
wtiteln('2. Иерусалимское королевство, Княжество Антиохия');
wtiteln('3. королевство Крестоносцев');
readln(d);
if d=2 then writeln ('молодец!');
k:=k+1
end.
else wtiteln('Неправильно');
wtiteln('Что было важнейшим орудием Церкви против еретиков?');
wtiteln('Инквизиция');
wtiteln('1.Законы ');
wtiteln('2. Вера');
wtiteln('3. Инквизиция');
readln(k);
if k=3 then writeln ('молодец!');
k:=k+1
end.
else wtiteln('Неправильно');
wtiteln('Кто такой Фома Аквинский?');
wtiteln('Теолог признанный церковью');
wtiteln('1.Теолог ');
wtiteln('2. Еретик');
wtiteln('3. Церковный служитель');
readln(k);
if k=3 then writeln ('молодец!');
k:=k+1
end.
else wtiteln('Неправильно');
if k=6 then writeln ('Вы набрали ',k,' баллов , ваша оценка 5');
if k=5 then writeln ('Вы набрали ',k,' баллов , ваша оценка 4');
if k=4 then writeln ('Вы набрали ',k,' баллов , ваша оценка 3');
if k=3 then writeln ('Вы набрали ',k,' баллов , ваша оценка 2');
if k=2 then writeln ('Вы набрали ',k,' баллов , ваша оценка 1');
if k=1 then writeln ('Вы набрали ',k,' баллов , ваша оценка 0');
1
ответ
Ответ:
var a,b,c,d,f,k,h:integer;
begin
writeln('В каком веке было введено право городов избирать органы власти?');
writeln('в 11-12 веках');
writeln('1.В 13 веке');
writeln('2. в 11-12 веках');
writeln('3.в 5 веке');
readln(a);
if a=2 then writeln ('молодец!');
k:=k+1;
writeln('на ком основывалась светская власть в Средневековье?');
writeln('короли');
writeln('1.короли');
writeln('2. Церковь');
writeln('3. Крестьяне');
readln(b);
if b=1 then writeln ('молодец!')
else writeln('Неправильно');
writeln('какую власть имел орден св.Доминика?');
writeln('преследовать еретиков');
writeln('1.не подчинятся церкви ');
writeln('2. преследовать еретиков');
writeln('3. вести завоевательные походы');
readln(c);
if c=2 then writeln ('молодец!')
else writeln('Неправильно');
writeln('какие государства были образованы на завоеванных территориях во время крестовых походов?');
writeln(' Иерусалимское королевство, Княжество Антиохия');
writeln('1.Финикия ');
writeln('2. Иерусалимское королевство, Княжество Антиохия');
writeln('3. королевство Крестоносцев');
readln(d);
if d=2 then writeln ('молодец!')
else writeln('Неправильно');
writeln('Что было важнейшим орудием Церкви против еретиков?');
writeln('Инквизиция');
writeln('1.Законы ');
writeln('2. Вера');
writeln('3. Инквизиция');
readln(k);
if k=3 then writeln ('молодец!')
else writeln('Неправильно');
writeln('Кто такой Фома Аквинский?');
writeln('Теолог признанный церковью');
writeln('1.Теолог ');
writeln('2. Еретик');
writeln('3. Церковный служитель');
readln(k);
if k=3 then writeln ('молодец!')
else writeln('Неправильно');
if k=6 then writeln ('Вы набрали ',k,' баллов , ваша оценка 5');
if k=5 then writeln ('Вы набрали ',k,' баллов , ваша оценка 4');
if k=4 then writeln ('Вы набрали ',k,' баллов , ваша оценка 3');
if k=3 then writeln ('Вы набрали ',k,' баллов , ваша оценка 2');
if k=2 then writeln ('Вы набрали ',k,' баллов , ваша оценка 1');
if k=1 then writeln ('Вы набрали ',k,' баллов , ваша оценка 0');
end.
Объяснение:
var a,b,c,d,f,k,h:integer;
begin
writeln('В каком веке было введено право городов избирать органы власти?');
writeln('в 11-12 веках');
writeln('1.В 13 веке');
writeln('2. в 11-12 веках');
writeln('3.в 5 веке');
readln(a);
if a=2 then writeln ('молодец!');
k:=k+1;
writeln('на ком основывалась светская власть в Средневековье?');
writeln('короли');
writeln('1.короли');
writeln('2. Церковь');
writeln('3. Крестьяне');
readln(b);
if b=1 then writeln ('молодец!')
else writeln('Неправильно');
writeln('какую власть имел орден св.Доминика?');
writeln('преследовать еретиков');
writeln('1.не подчинятся церкви ');
writeln('2. преследовать еретиков');
writeln('3. вести завоевательные походы');
readln(c);
if c=2 then writeln ('молодец!')
else writeln('Неправильно');
writeln('какие государства были образованы на завоеванных территориях во время крестовых походов?');
writeln(' Иерусалимское королевство, Княжество Антиохия');
writeln('1.Финикия ');
writeln('2. Иерусалимское королевство, Княжество Антиохия');
writeln('3. королевство Крестоносцев');
readln(d);
if d=2 then writeln ('молодец!')
else writeln('Неправильно');
writeln('Что было важнейшим орудием Церкви против еретиков?');
writeln('Инквизиция');
writeln('1.Законы ');
writeln('2. Вера');
writeln('3. Инквизиция');
readln(k);
if k=3 then writeln ('молодец!')
else writeln('Неправильно');
writeln('Кто такой Фома Аквинский?');
writeln('Теолог признанный церковью');
writeln('1.Теолог ');
writeln('2. Еретик');
writeln('3. Церковный служитель');
readln(k);
if k=3 then writeln ('молодец!')
else writeln('Неправильно');
if k=6 then writeln ('Вы набрали ',k,' баллов , ваша оценка 5');
if k=5 then writeln ('Вы набрали ',k,' баллов , ваша оценка 4');
if k=4 then writeln ('Вы набрали ',k,' баллов , ваша оценка 3');
if k=3 then writeln ('Вы набрали ',k,' баллов , ваша оценка 2');
if k=2 then writeln ('Вы набрали ',k,' баллов , ваша оценка 1');
if k=1 then writeln ('Вы набрали ',k,' баллов , ваша оценка 0');
end.
Объяснение:
0
·
Хороший ответ
4 апреля 2023 09:00
Остались вопросы?
Еще вопросы по категории Информатика
Изображение на экране имеет размер 800 на 600 Определите пространственное разрешение монитора...
Ребят C#, помогите решить ошибку: System.FormatException: "Входная строка имела неверный формат." Программа сначала работает нормально: пользователь п...
Дан условный оператор: if a<5 then c:=1 else if a>5 then c:=2 else c:=3 Какое значение имеет переменная a , если в результате выполнения условно...
Для расчета будущей стоимости фиксированных периодических платежей или будущей стоимости текущего вклада или займа, среди финансовых функц...
Старший помощник лом оказался старательным учеником чтобы порадовать капитана Врунгеля он выучил морскую Семафорная Азбука которой каждая буква кодиру...