1) составить программу для нахождения суммы чисел 1 сотни, которая делится на 3. (паскаль) 2) составить программу для нахождения суммы чисел от 500 до 700. (паскаль)
232
301
Ответы на вопрос:
//pascal abc.net v3.1 сборка 1172 //1 var n,i,s: integer; begin n: =0; for i: =1 to 100 do begin n: =n+3; s: =s+n; end; writeln(s); end. //2 var i: integer; r: integer; begin for i: =500 to 700 do r: =r+i; writeln(r); end.
Популярно: Информатика
-
shlama28313.02.2021 06:03
-
Tanecka250106.11.2020 03:06
-
alyafalendysh24.09.2020 09:09
-
dfoddo14.08.2022 21:58
-
dfghfgjkhfdjkgh30.06.2021 09:24
-
даниил85402.06.2021 01:05
-
daniil2003m30.01.2022 16:09
-
никитаррр123.03.2022 23:47
-
iDanee26.04.2020 03:04
-
MuLaYa319.10.2022 19:03