Спо delphi! надо вывести 10 (a*b=c) в цикле, программа проверяет и считает . в ходе цикла надо вывести правильный ответ(если вы ввели неправильный ответ). также программа считает количество в зависимости от правильных ответов. var i,x,y,answer,input: integer; begin writeln('*test*'); randomize; answer: =10; for i: =1 to 10 do begin write(random(x),' * ',random(y),' = '); //я не знаю как задать диапазон для //переменной readln(input); if input: =x*y then //программа выдает ошибку что нужен тип //переменной boolean begin answer: =answer; end else begin write('wrong! ',x,' * ',y,' = ',x*y) answer: =answer-1; end; end; writeln('correct answers - ',answer); case answer of 10: writeln('excellent! '); 9,8: writeln('good! '); 6,7: writeln('ok! '); 0..5: writeln('bad! '); end; readln;
143
389
Ответы на вопрос:
Var i,x,y,answer,input,k: integer; begin writeln('*test*'); randomize; answer: =10; k: =0; for i: =1 to answer do begin x: =random(9)+1; y: =random(9)+1; write(x,' * ',y,' = '); readln(input); if input=x*y then begin k: =k+1; writeln('right! '); end else writeln('wrong! ',x,' * ',y,' = ',x*y); end; writeln('correct answers - ',k); case answer of 10: writeln('excellent! '); 9,8: writeln('good! '); 6,7: writeln('ok! '); 0..5: writeln('bad! '); end; end. пример: *test* 2 * 4 = 8 right! 7 * 9 = 7 wrong! 7 * 9 = 63 4 * 4 = 16 right! 1 * 2 = 2 right! 4 * 1 = 4 right! 9 * 7 = 63 right! 9 * 8 = 72 right! 3 * 1 = 3 right! 9 * 4 = 36 right! 6 * 4 = 24 right! correct answers - 9 excellent!
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
djhvh23526.08.2021 21:25
-
Makar19804314.11.2022 05:34
-
tanya73228.07.2020 12:00
-
larisagorkavchenko17.10.2021 01:10
-
Влада1999373718.03.2020 06:00
-
Be11a14.05.2020 03:00
-
LeMuRkA22829.05.2022 15:39
-
lalalllaaaallllalala14.02.2022 15:25
-
ruks77710.09.2021 16:11
-
skyline1234513.01.2022 20:09
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.