алг
нач
лит таб страна[1:5]={"Белоруссии","Испании","Германии","Великобритании","России"}
лит таб столица[1:5]={"Минск","Мадрид","Берлин","Лондон","Москва"}
лит отв
цел н,оценк=0
вывод "викторина- 5 вопросов о столицах стран", нс
нц для н от 1 до 5
вывод н, ") какая столица у ", страна[н], "?", нс
ввод отв
если отв=столица[н] то оценк:=оценк+1 все
кц
если оценк=5
то вывод "молодец, оценка 5"
иначе вывод "извините, но пяти верных ответов не было"
все
кон
алг
нач
лит таб страна[1:5]={"Белоруссии","Испании","Германии","Великобритании","России"}
лит таб столица[1:5]={"Минск","Мадрид","Берлин","Лондон","Москва"}
лит отв
цел н,оценк=0
вывод "викторина- 5 вопросов о столицах стран", нс
нц для н от 1 до 5
вывод н, ") какая столица у ", страна[н], "?", нс
ввод отв
если отв=столица[н] то оценк:=оценк+1 все
кц
если оценк=5
то вывод "молодец, оценка 5"
иначе вывод "извините, но пяти верных ответов не было"
все
кон