Составьте программу( Pascal), которая заполняет массив a (1..10) случайными целыми числами от 1 до 20 и выводит на экран элементы, значения которых больше 5 и меньше 15

там исправь слово rndom на random

не странно ли, что ошибка в синтаксисе такая же, как у меня?

Скатал у тебя!

ОК! Спасибо!

var a:array [1..10] of integer;i:integer;beginfor i:=1 to 10 dobegina[i]:=rndom(20)+1;write(a[i],' ')end;writeln;for i:=1 to 10 doif (a[i]>5) and (a[i]<15) then write(a[i],' ')end.

Program program1;vara:array [1..10] of integer;int:integer;beginfor int:=1 to 10 dobegina[int]:=rndom(20)+1;write(a[int],' ')end;writeln;for int:=1 to 10 doif (a[int]>5) and (a[int]<15) then write(a[int],' ')end.