Информатика, 7 класс Запишите путь к файлу Снегири.png и полное имя файла История ЭВМ.doc

180

356

Посмотреть ответы 1

Ответы на вопрос:

ВероникаЛицей124

Информатика

4,7(47 оценок)

Ясделала ввод массива с клавиатуры, но ты можешь сделать его рандомными числами const n=5; var a: array [1..n] of real; i: integer; begin writeln('введите массив'); for i: =1 to n do readln(a[i]); writeln('положительные элементы: '); for i: =1 to n do if a[i]> 0 then writeln('a[', i, ']=', a[i]); end.