Лучшие помощники
- Megamozg 2200 б
- Matalya1 1800 б
- DevAdmin 1700 б
- arkasha_bortnikov 890 б
- Dwayne_Johnson 860 б
3 апреля 2023 03:20
477
Помогите найти ошибку в коде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
·
Хороший ответ
5 апреля 2023 03:20
Остались вопросы?
Еще вопросы по категории Информатика
ПОМОГИТЕ С ИНФОРМАТИКОЙ, ПОЖАЛУЙСТА!! Анализ числа, python. ПЕРВЫЙ ВОПРОС. в каком случае эта программа напечатает «Да»? 1) если две цифры числа ра...
Переведите целые числа из десятичной системы счисления в восьмеричную: а) 513 б) 600 в) 2010...
N=1920*1200 Глубина цвета=11000 в квадрате 78 герц в 16 степени t=14 в восьмой степени мин I за 2 минуты F=?...
Решите задачу: Для кодирования одного пикселя используется 4 байта фотографию размером 1024*2048 пикселей сохранили в виде несжатого файла определите...
Какая операция не применяется для редактирования текста? а) удаление в тексте неверно набранного символа б) вставка пропущенного символа в) печать т...
Все предметы