Сделать в abc pascal задайте массив из 10 элементов с датчика случайных чисел. выведите на экран исходный массив и те элементы, которые больше 25, а также их индексы.
ke7rin
1
22.05.2019 05:40
2
Другие вопросы по теме Информатика
marisa10
10.08.2019 09:50
moonlight2812
10.08.2019 09:50
ivnna2013
10.08.2019 09:50
annswi
08.03.2021 15:26
Алекс23102027
08.03.2021 15:24
dimakrochak
10.09.2019 16:30
Katrin8745
10.09.2019 16:29
absde91
10.09.2019 17:20
HeBiDiMKa
10.09.2019 17:20
Популярные вопросы
- Все приведённые ниже термины, кроме двух, используются для описания кариотипа...
3 - Из чисел 12 5 15 4 составте член пропорции с решением...
2 - С какой нацией хочешь познакомиться , почему? ответить на вопрос...
1 - Відстань між двома пристанями по річці дорівнює 300км. Цю відстань теплохід...
2 - Нужна схема и какое оно предложение СПП и ССП или БСП...
2 - Елімізде мұнай өндіру қалай жүзеге асатыны туралы мәлімет жинаңдар....
1 - я уже 3 часа не могу понять как это делать...
3 - Напишите сочинение-рассуждение, раскрывая смысл высказывания: «Нет тропа...
1 - X-0,5/3-x/4=O i o,3(8-3y)=0,8(7-y)-3...
2 - 3 Read and choose. Grandma, what a big mouth you ve got! Grandma, what a...
3
uses crt;
var a:array[1..10] of real; i:integer;
begin
clrscr;
randomize;
for i:=1 to 10 do
begin
a[i]:=random(100);
if (a[i]>25) then writeln('element ',a[i],',index ',i);
end;
end.