Написать программу которая сравнивает сумму четных значений с нечетными значением !
146
493
Ответы на вопрос:
Pascalabc.net 3.3.5, сборка 1659 от 09.04.2018 внимание! если программа не работает, обновите версию! begin var (so,se): =(0,0); readseqintegerwhile(t-> t> 0).foreach(t-> if t.isodd then so+=t else se+=t); write('сумма четных ',se,' '); if se> so then write('> ') else if se=so then write('=') else write('< '); writeln(' суммы нечетных ',so) end. пример 3245 6774 23241 5645 967 32234 123 65 2134 0 сумма четных 41142 > суммы нечетных 33286 программа считывает данные, пока они являются натуральными числами.
Процесс создания приложения в lazarus можно разделить на следующие этапы: 1. формирование окна программы – расположение необходимых элементов, размеров, изменение свойств; 2. написание программного кода, описание свойств элементов, доступных только во время работы приложения, описание реакций на событие появления окна, нажатие на кнопку и других; 3. отладка программы.
Популярно: Информатика
-
kingoflfmvd06.01.2023 17:31
-
Popyliarnich04.11.2020 01:15
-
Ритаforever04.09.2020 15:50
-
Daya9888888826.06.2023 15:31
-
maksategemberdi16.09.2020 23:57
-
Cennet5514.04.2021 21:08
-
Nodukam23.07.2022 01:36
-
Анналолкек19.03.2021 17:00
-
julianna1915.01.2020 22:42
-
даночкаа8817.12.2022 08:02