Ответы на вопрос:
1.Прочитати умову задачі.
2.Подумати про що йде мова у цій задачі.
3.Записати коротку умову.
4.Поміркувати,як її можна вирішити(у голові або на чернетці)
5.Якщо ви впевнені у рішенні переписати його начисто.
6.Якщо ні ,поміркувати ще)
Объяснение:
мені здається,що так.Удачі)
var a: array [1..100] of integer;
var index of integer;
var mmax of integer;
begin
for i: =1 to do
a[i]: =random(-1)+50; // формула рандома random(b-a+1)+a;
// вывод всех номеров
for i: =1 to do
if(a[i] => mmax):
mmax = a[i];
for i: =1 to do
if(a[i]! =mmax):
index++;
else:
write(index);
могут быть ошибки в коде так как давно на паскале ничего не делал, но алгоритм примерно тот же
Популярно: Информатика
-
Элника17.04.2020 07:39
-
bosyakostya06.01.2021 12:09
-
shamalava21050503.07.2021 06:28
-
23774947hhbhut17.04.2022 20:31
-
astimorget16.04.2023 02:57
-
кисуня20808.05.2022 07:38
-
varvarasitikova15.06.2021 01:06
-
seidov0530.07.2020 14:27
-
pandaswomenp08cc403.06.2020 18:46
-
5Kamilla50522.04.2020 00:41