Написать программу для подсчета суммы введенных с клавиатуры чисел до тех пор, пока не будет введен 0.
190
378
Ответы на вопрос:
//pascalabc.net //версия 3.3, сборка 1634 begin write(readseqintegerwhile(x-> x< > 0).sum); end.
Var a,s: integer; begin s: =0; readln(a); while a< > 0 do begin s: =s+a; readln(a); end; writeln('s = ',s); end. пример: 5 8 3 4 6 0 s = 26
1) a153b42fb4 = a153b522fb52 = abfb52
c. abfb52
2) 23abn12qr8n = 23qrn12ab8n = 23qr12ab8
a. 23qr12ab8
3) 2*2 = 4; 4*2 = 8; 8-1 = 7; 7*2 = 14;
2212
4) 6+1 = 7; 7+1 = 8; 8*2 = 16; 16*2 = 32; 32+1 = 33;
22112
Популярно: Информатика
-
umka234514.05.2022 16:47
-
кракозябрлохиябра205.05.2023 16:12
-
Mashannjjj27.06.2023 07:57
-
Ника1204000020.01.2023 11:46
-
edinorogserezha116.10.2022 23:31
-
Приветипока07.06.2020 18:09
-
пингвиниха2017201808.02.2023 03:34
-
ива35706.09.2020 07:47
-
kense01.06.2022 22:19
-
KetZu26.09.2021 19:56