Вопрос задан 18.02.2019 в 19:46. Предмет Информатика. Спрашивает Бурмистрова Арина.

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

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

Creating a Multiplication Table Test in Pascal

To create a test for the multiplication table of 7 in Pascal, you can use a loop to iterate through the numbers 1 to 10 and calculate the product of each number with 7. Here's an example of how you can implement this in Pascal:

```pascal program MultiplicationTableTest;

var i, product, answer: integer;

begin for i := 1 to 10 do begin product := 7 * i; writeln('What is 7 multiplied by ', i, '?'); readln(answer); if answer = product then writeln('Correct!') else writeln('Incorrect. The correct answer is ', product); end; end. ```

In this code, the `for` loop iterates through the numbers 1 to 10. For each iteration, it calculates the product of 7 and the current number (`7 * i`). It then prompts the user with the question "What is 7 multiplied by [current number]?" and reads their answer from the console using `readln(answer)`.

The code then compares the user's answer (`answer`) with the correct product (`product`). If they match, it displays the message "Correct!". Otherwise, it displays the message "Incorrect. The correct answer is [product]".

You can run this Pascal program in an IDE or compiler that supports Pascal, such as Free Pascal or Turbo Pascal, to test your knowledge of the multiplication table for 7.

Note: Pascal is a programming language that was popular in the 1970s and 1980s. While it is still used in some educational settings and legacy systems, it is not as widely used today as languages like Python or JavaScript.

I hope this helps! Let me know if you have any further questions.

0 0

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос