Тест Дан фрагмент программы для формирования массива:for i:=1 to 5 do a[i]:=i+2;for i:=1 to 5 do writeln ('a[',i,']=',a[i]); Какой массив будет напечатан? *
a[1]=3 a[2]=4 a[3]=5 a[4]=6 a[5]=7
a[1]=1 a[2]=2 a[3]=3 a[4]=4 a[5]=5
a[1]=3 a[2]=5 a[3]=7 a[4]=9 a[5]=11
2. Что выполняет следующий фрагмент программы:For i:=1 to 10 do a[i]=:randome(100)+50; *
заполняет массив случайными числами в промежутке от -50 до 50
заполняет массив случайными числами в промежутке от 0 до 150
заполняет массив случайными числами в промежутке от 50 до 150
3. Целочисленный массив А заполнен последовательно числами: 15, 17, 13, 19. Укажите, значение элемента массива А[3]? *
17
13
19
15
4. Какие значения примут элементы массива A[3] и A[4] после выполнения фрагмента программы: A[3] := 5;A[4] := 6;k:=0k:=A[3];A[3] := A[4]A[4]:=k? *
A[3] := 6; A[4] := 0;
A[3] := 5; A[4] := 6;
A[3] := 6; A[4] := 5;
5. Дан массив: a[1]=7, a[2]=3, a[3]=5, a[4]=0, a[5]=4, a[6]=1, a[7]=8, a[8]=8, a[9]=1, a[10]=2.Определите значение переменной k после выполнения следующего фрагмента программызаписанного на языке программирования Паскаль:k:=0;for i:=1 to 10 do if a[i]>=5 then k:=k+1; writeln ('k=',k); *
6
10
4
6. В записи "a[5]=10" - А обозначает… *
значение пятого элемента массива
имя массива
индекс элемента массива
7. Найдите правильное описание массива *
D: of [1..5] array of integer;
D: array [1..5] of integer;
D [1..5]: array of integer;
8. Дан массив: a[1]=7, a[2]=3, a[3]=5, a[4]=0, a[5]=4, a[6]=1, a[7]=8, a[8]=8, a[9]=1, a[10]=2.Определите значение переменной s после выполнения следующего фрагмента программы записанного на языке программирования Паскаль :s:=0;for i:=1 to 10 do s:=s+a[i]; writeln ('s=',s); *
40
37
39
271
309
Ответы на вопрос:
Uses crt; var p,r: array [1..10000] of real; x,y,t,f,k: integer; sum,sr,ch,min: real; begin sum: =0; k: =0; f: =1; write('t='); readln(t); for x: =1 to t do begin write('p[',x,']: '); readln(p[x]); end; min: =p[1]; for x: =1 to t do if p[x]> 0 then begin sum: =sum+p[x]; inc(k); end; for x: =1 to 9 do if p[x]< min then min: =p[x]; sr: =sum/k; ch: =min/sr; for x: =1 to t do if p[x]> ch then begin r[f]: =p[x]; inc(f); end; writeln; for y: =1 to f-1 do writeln('r[',y,']: ',r[y]); readln; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
turdalievab17.11.2022 03:26
-
МаксимНелучший31.01.2021 05:31
-
Zagadochnaya07.06.2023 08:09
-
ванька6820.09.2022 01:39
-
Ясминка200619.12.2021 09:01
-
elnerfaiq23.06.2021 20:31
-
Макслей22.09.2020 09:54
-
Mihailkim201806.04.2020 00:57
-
Пусик9515.01.2020 12:24
-
themartynov2317.10.2022 08:31
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.