Ответы на вопрос:
Var ar: array[1..10] of integer; i,min,mini: integer; begin; min: =101; randomize; writeln('array: '); for i: =1 to 10 do begin; ar[i]: =random(100); write(ar[i]: 4); if ar[i]< min then begin; min: =ar[i]; mini: =i; end; end; writeln; writeln('min: ',min,' in number: ',mini); end.
Пользователь вводит строку, если в строке есть большая буква "A", то заменить ее на букву "Б", остальные символы удалить.
Популярно: Информатика
-
PolinaGetto12.04.2020 16:31
-
мяустик02.10.2020 02:15
-
njjk112.09.2021 20:25
-
pd10125.02.2022 01:29
-
лолkjk04.03.2021 22:40
-
mrartemartem117.07.2022 19:10
-
melongemma06.10.2022 22:49
-
ната3456789028.05.2021 19:48
-
София645116.01.2020 21:33
-
anyta00611.03.2020 15:27