Напишите полное решение без пояснений: вывести на экран элементы массива у которых сумма номера и элемента дают число кратное 7 (элементов массива:15. массив вводится случайным образом в интервале [10;13])
Uses crt; const n=15; var mas:array [1..n] of integer; i:integer; begin mas[i] := Random(23) - 10; for i:=1 to n do readln(mas[i]); write('Числа кратные 7: '); for i:=1 to n do if ((mas[i] i) mod 7 = 0) then write(mas[i],' '); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
