Taras229
20.10.2021 11:31

Напишите программу формирования и вывода массива размером 6x3, каждые три последовательных элемента в строке которого составлены по следующему правилу: 1-й — равен сумме текущих индексов, увеличенной в 10 раз; 2-й — равен целой части от деления случайного числа на сумму текущих индексов; 3-й — равен разности двух предыдущих элементов.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Джaмиль
05.10.2020 23:37
Const
   N = 6;
Var
   A:array[1..N,1..3] of integer;
   i:integer;
Begin
Randomize;
For i:= 1 to N do
    Begin
    A[i,1]:=i*10;
    A[i,2]:=random(i*13) div (i+2);
    A[i,3]:=A[i,2]-A[i,1];
    WriteLn(A[i,1],' ',A[i,2],' ',A[i,3])
    End;
End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота