• Создать тест по таблице умножения на 7. паскаль авс

Ответы 4

  • Все замечательно, только информатика тут причем?
    • Автор:

      peteri4p7
    • 6 лет назад
    • 0
  • И где тот самый "паскаль авс ", о котором в условии упоминали?
  • var  n,nt,d,p,r:integer;begin  n:=0; nt:=0;  Writeln('Поверьте свои знания таблицы умножения на 7');  Randomize;  repeat    Write('1- продолжать, 0 - закончить: ');    Read(d);    if d=1 then begin      p:=Random(10)+1;      Inc(n);      Write('7x',p,'='); Read(r);      if r=7*p then begin Writeln('Верно'); Inc(nt) end      else Writeln('Неверно, ответ ',7*p)      end    else      if n>0 then Writeln('Верных ответов ',nt,' из ',n)  until d<>1;  Writeln('Ждем Вас снова!')end.
    • Автор:

      pope97
    • 6 лет назад
    • 0
  • Вопрос №1У Лены 3 каштана,а у Леси-на 7 больше.Сколько листов у Леси?А)42Б)22В)21№2Решите уравнение:7*9=х=А)64Б)56В)67№3Решите пример:48+(7*6)=А)50Б)90В)80*-умножить
    • Автор:

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

Войти через Google

или

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

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

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