Ответы на вопрос:
Объяснение:
Рисуешь два круга так, чтобы они пересекали друг друга в двух точках
левая часть круга (1круг)-Источник
правая часть(2 круг) - Приëмник
центр (область пересечения двух кругов, овал) - Источник И Приëмник
Program p1; uses crt; var max,min,a: integer; begin read(a); max: =a; min: =a; while a< > 0 do begin read(a); if (max< a) and (a< > 0) then begin max: =a; end; if (min> a) and (a< > 0) then min: =a; end; write(max,' ', min); end.
Популярно: Информатика
-
rudenkonn5723.03.2020 08:52
-
НаташаБатракова25.09.2022 13:06
-
Stanislav17714.02.2023 06:31
-
Artem1230927.05.2022 19:30
-
KaapaaToown27.03.2023 03:34
-
Logas2574318.12.2020 13:47
-
gjgjggfasf13.12.2021 06:59
-
dilmurod929221.03.2021 16:31
-
Pomogite20000p09.05.2022 02:41
-
муркот1104.06.2021 17:15