Составьте программу pascal позволяющую проверить знание таблицы умножения

Составьте программу pascal позволяющую проверить знание таблицы умножения
Гость
Ответ(ы) на вопрос:
Гость
//Pascal ABC.NET v3.0 сборка 1111 Var  a,b,c:integer; begin  randomize;   a:=random(1,9);   b:=random(1,9);   write(a,'*',b,'=');   read(c);   if c=a*b then writeln('Yes') else writeln('No'); end. Пример вывода: 6*9= Пример ввода: 54 Снова вывод: Yes
Не нашли ответ?
Ответить на вопрос
Похожие вопросы