Придумайте алгоритм вводящий три целых числа, определяющих количество максимальных чисел среди введенных. построить блок схему
211
294
Ответы на вопрос:
Var a: array[1..3]of integer; i, max, t, k: integer; begin writeln('введите числа'); for i: =1 to 3 do read(a[i]); for i: =1 to 3 do write(a[i]); writeln(); max: =a[1]; k: =0; for i: =1 to 3 do begin if (a[i]> max) then begin max: =a[i] t: =max; end; if (a[i]=t) then k: =k+1; end; writeln('количество= ',k); end.
Попробуй переустановить виндовс, или если у тебя были файлы с пропавшего диска, в свойствах узнай путь расположения.
Популярно: Информатика
-
Ухв23.07.2021 16:29
-
zkudaybergen29.12.2021 13:53
-
YtNazarIdline28.03.2020 06:07
-
snezhana919714.06.2022 09:59
-
Ferdgi12.01.2021 06:53
-
fizik2409.09.2020 07:01
-
ccfnwj366231.05.2023 00:56
-
Крахмал1624.12.2022 14:32
-
Обжора22825.07.2021 15:35
-
viahseslav23.05.2023 16:12