logo
Войти Регистрация Спроси ai-bota


tanygina067
19.10.2022 15:31

Склавиатуры вводится числа . завершение ввода - число 0. найдите сумму введённых чисел.

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
kamilya14957
kamilya14957
02.04.2020 14:38
Program kod; var q,w,e,r,t,y,u,i,x: integer; begin write(q,w,e,r,t,y,u,i); if q=1 then x+(1*2*2*2*2*2*2*2); if q=0 then x+0; if w=1 then x+(1*2*2*2*2*2*2); if w: =0 then x+0; if e=1...
Aly6000
Aly6000
02.04.2020 14:38
Определите вид списка. естественно - научные дисциплины а) б) а. маркированный в. смешанный с. уровней d. нумерованный...
код127
код127
14.05.2020 11:08
Определите, что будет напечатано в результате работы следующей программы. Var s,k: integer;Begin s := 0; for k := 4 to 8 do s := s+7; writeln(s);End. Определите, что будет напечатано...
ари53
ари53
18.10.2022 19:52
Информатика! 9 класс ХОТЯ БЫ С ОДНИМ ЗАДАНИЕМ ​...
Deyzer777
Deyzer777
25.11.2022 04:23
Найти самый короткий путь(см. вложения)...
nadialihas2005
nadialihas2005
06.12.2020 02:57
=82 какие результаты можно получить...
Djilsi
Djilsi
06.12.2020 02:57
Известна стоимость монитора, системного блока, клавиатуры и мыши. Сколько будут стоить 3 компьютера из этих элементов? N компьютеров? Написать на C++...
selipups96
selipups96
18.04.2022 00:02
Что такое «интеллектуальная...
elizamir808
elizamir808
27.05.2021 13:45
Напишіть функцію, що обнуляє елементи списку що стоять на непарних місцях. в тони...
DEAFKEV
DEAFKEV
22.01.2023 18:05
37 и 99 в 8-битном в формате (с решением)...
Ответ:
Вазген228
03.10.2020 08:37
var
a,k:integer;
begin
k:=0;
repeat  
readln(a);
k:=k+a;
until a = 0;
writeln(k);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота