fkn+antitotal

Задание 3 Урок 13.1

Выведите на экран таблицу умножения используя один цикл while и один repeat-until .

var i, j: integer;
begin
  i := 1;
  while (i <= 9) do begin
    j := 1;
      repeat
        write(i, '*', j, '=', i*j, ' ');
        j:=j+1;
       until (j > 9);
      writeln();
      i:=i+1;
   end;
   readln();
end. 

Задание 2 Урок 13.1

Выведите на экран таблицу умножения используя только циклы вида while.

var i, j: integer;
begin
  i := 1;
  while (i <= 9) do begin
    j := 1;
      while (j <= 9) do begin
        write(i, '*', j, '=', i*j, ' ');
        j:=j+1;
      end;
      writeln();
      i:=i+1;
   end;
   readln();
end.

Задание 1 Урок 13.1

Выведите на экран таблицу умножения используя только циклы вида repeat/until.

var i, j: integer;
begin
  i := 1;
  repeat
    j := 1;
      repeat
        write(i, '*', j, '=', i*j, ' ');
        j:=j+1;
      until (j>9);

    writeln();
    i:=i+1;

  until (i > 9);
  readln();
end.

A computed property name in an interface must refer to an expression whose type is a literal type or a 'unique symbol' type

Минимальный пример демонстрации проблемы:

const myobj: Record<string, number> = {
  a: 1,
  b: 2,
}

interface myinter  {
  [myobj.a]: string, // problem here
}

Задание 2 Урок 12.2

У вас есть программа, использующая цикл while:

Задание 1 Урок 12.2

Имеется программа:

var i: integer;
begin
  for i:=5 to 34 do
    write(i, ' ');
 
  readln();
end.

Ответьте на вопросы/выполните задания

1. Что в ней происходит?
2. Что будет на экране после её выполнения?
3. Перепишите её, используя цикл while.
4. Перепишите её, используя цикл repeat/until.

Ответы:

Задача 15

Задача 14

Есть два массива "a" и "b". На вход вашей программе подаётся массив "a" случайных чисел (10 элементов) из диапазона от 1 до 20. Задача: вывести на экран все числа, которые не содержатся в массиве "b"

$b = [12, 5, 17, 6, 4];

Решите эту задачу двумя способами:

Без использования in_array()(link is external)
С использованием in_array()(link is external) (что проще)

СПОСОБ 1

Задача 13

Создайте функцию, которая принимает на вход массив случайных чисел из диапазона [5..12]. Обходит этот массив и делает для каждого элемента следующее (пусть она оказывает побочный эффект прямо в своём теле):
Если это число равно 5 -- то выведете на экран строку "пять", если 6 -- то строку "шесть", если 7 то число "7", иначе -- строку "какое-то другое число".
Используйте для решения задачи оператор switch(link is external) (или см. книгу Стивена Хольцнера стр. 60).

Задача 12

Даны два массива по 20 элементов каждый (заполните случайными числами, так чтобы среди элементов массива при очередном запуске программы могли встретиться и отрицательные и положительные числа).
Сравните каждый 3-ий элемент 1-ого массива с каждый 2-ым элементов 2-ого массива - сравнение проводите пока не закончится та выборка, которая короче.
Например пусть мы имеем два массива (запишу лишь начальные элементы):