Работа с паскалем найти сумму целых положительных чисел из промежутка от а до в, кратных 4. значения а и в вводятся с клавиатуры.
135
218
Ответы на вопрос:
Var a,b,s,i: integer; begin writeln('a, b: '); readln(a,b); s: =0; for i: =a to b do if i mod 4=0 then s: =s+i; writeln('s = ',s); end. пример: a, b: 20 100s = 1260
Популярно: Информатика
-
police514.10.2021 00:46
-
Viki388802.07.2021 12:19
-
KunLallalit02.01.2022 14:19
-
8katenokp08idx26.11.2021 04:29
-
vladishe127.03.2020 06:54
-
romanenckoalia05.10.2020 06:44
-
rafik32102.01.2022 14:59
-
лика2004231.01.2023 18:25
-
Walker9510.10.2021 04:16
-
6hh6h6h05.04.2022 14:06