ПОМОГИИТЕЕ!:((СОВСЕМ НЕ ПОНИМАЮ ИНФОРМАТИКУ!!:(Заполнить случайными целыми числами...

0 голосов
33 просмотров

ПОМОГИИТЕЕ!:((СОВСЕМ НЕ ПОНИМАЮ ИНФОРМАТИКУ!!:(
Заполнить случайными целыми числами диапазона от 10 до 25,массив из 10 элементов.Вывести его на экран в столбец.


Информатика (19 баллов) | 33 просмотров
Дан 1 ответ
0 голосов

А зря, информатика полезная штука
var
  a : array [1..10] of integer;
  i : integer;
begin
  for i := 1 to 10 do
    a[i] := random (16) + 10;
  for i := 1 to 10 do
    writeln (a[i]);
end.

(4.6k баллов)
0

Спасибо!

0

только,откуда взялось число 16?(