Отгадайте слова (не прошу сильно стараться, любые) : б****р* - ко*т***** - *и***ла*с - ***та**р - м**о**в - **ем*** -с**ц***д*ож**** - **е**т заранее !
190
369
Ответы на вопрос:
бильярд - континуум - - фантазер - мухолов - кремний - не знаю - кредит
Var a,b,c: integer; begin b: =0; for a: =1 to 100 do begin if (a mod 2 < > 0) then b: =a+b; end; writeln('сумма нечётных чисел в заданном диапазоне = ', b); end.
Популярно: Информатика
-
mussa77777223.11.2022 16:16
-
swietajakubiak14.08.2022 18:41
-
насьть28.01.2023 08:04
-
Liova2330.05.2020 14:28
-
palechov0129.03.2023 02:23
-
onealoner1309.11.2022 06:05
-
Света20200221.10.2021 03:44
-
МиленаШифр27.01.2020 07:14
-
Ilyauhdhbtx06.01.2020 23:07
-
bahriddinJoN208513.02.2021 08:10