Выбирите из предложенного списка прикладного ПО приложения ОБЩЕГО назначения 1) базы данных (сист. управления базами данных СУБД)
2) бухгалтерские программы
3) коммуникационные программы (мессенжеры и браузеры)
4) компьютерные игры
5) компьютерные словари и энциклопедии
6) мультимедиа проигрыватели
7) обучающие программы (электронные учебники, тесты, конструкторы)
8) программы разработки презентаций
9) системы компьютерного черчения
10) системы распознавания текста
11) текстовые, графические, звуковые редакторы
113
419
Ответы на вопрос:
Var a,b,c,m : integer; begin readln(a,b,c); if (a> b) and (b> c) and (c> 0) then begin a: =a*a; b: =b*b; c: =c*c; end else if (a< 0) and (b< 0) and (c< 0) and (a< > b) and (a< > c) and (b< > c) then begin m: =a; if b> m then m: =b; if c> m then m: =c; a: =m; b: =m; c: =m; end else begin writeln('сумма: ',a+b+c); halt(0); end; writeln('a = ',a,' b =',b,' c = ',c); end.
Популярно: Информатика
-
фиксоня21.08.2021 23:45
-
Kamikatze506.11.2020 17:08
-
gonigh24.02.2022 14:32
-
m8756m14.06.2023 22:07
-
kadieva197627.06.2020 00:37
-
1553VinyaPyhtya16.04.2022 16:03
-
jessyss11.02.2023 15:11
-
andreikoval0706.03.2023 22:48
-
сhevapchichi014.03.2023 18:52
-
fedya3329.09.2021 16:20