• Помогите ребят с Паскалем на кану оценка за четверть пж.
    Нужно написать программу которая проверяет у тебя таблицу умножения, машина должна дать 10 примеров и показать результат. Причём чтоб они не повторялись. Мы должны вбивать в конце одно число. Это ответ в каждом примере

Ответы 2

  • Ты спаситель(ницы).Спасибо
    • Автор:

      ernesto40
    • 6 лет назад
    • 0
  • Vara,b,i,z:integer;BeginClrScr;Randomize;for i:=1 to 10 do begin a:=random(9)+1; b:=random(9)+1; write(a,'*',b,' = '); readln(z); if z=a*b then writeln('Верно!') else  writeln('Не верно! ',a,'*',b,' = ',a*b); end;readln;end.Пример (для 3 заданий):6*6 = 36Верно!8*3 = 26Не верно! 8*3 = 242*4 = 8Верно!
    • Автор:

      danny994
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years