1. Информатика
  2. Написать программу ввода массива

Написать программу ввода массива до тех пор,пока сумма введенных элементов не превысит числа 100.на паскале

innagavr innagavr    3   27.06.2019 04:00    0

Ответы
LONNI34 LONNI34  21.07.2020 18:54
Var
sum,i:integer;
a:array[1..1024] of integer;
begin
i:=0;
sum:=0;
repeat
i:=i+1;
readln(a[i]);
sum:=sum+a[i];
until sum>100;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
olgateviasheva olgateviasheva  23.09.2019 02:30
1. сетевой топологией не является: а. звезда б. дерево в. квадрат г. кольцо 2. основной недостаток интеллектуальных токенов а. грубое шифрование б. малое сжатие в. большая...
Лиза878897897 Лиза878897897  20.04.2020 14:26
Информационный объём текста подготовленного с компьютера, равен 3,5 Мегабайт. нужно найти сколько символов содержит этот текст, если используется восьмиразрядная кодировка...
aresubject1701 aresubject1701  20.04.2020 14:26
Aid1 -Уровень АВыполните программу на ком-пьютере. Какие действия быливыполнены?в программе Scratch можновыбрать несколько костюмов, Обуясните причину.1 -11 сУровень вСоздайте...
rahmaevrail201 rahmaevrail201  20.04.2020 14:26
отдаю Ниже приведены за к поисковому серверу. По всем за было найдено разное количество страниц. Расположите за в порядке убывания количества страниц, которые нашёл поисковый...
Vitomalc777 Vitomalc777  20.04.2020 14:26
Перечислить какие инструменты использовались для построения следующей фигуры​...
msembinov msembinov  20.04.2020 14:26
Чему равна переменная a после выполнения цикла? a = 1; for i = 13 downto 5 do a = a + 1;...
Viksa1451 Viksa1451  20.04.2020 14:25
Как может быть записан адрес компьютера? Выберите несколько из 3 вариантов ответа: 1) Цифровой (IP-адрес). 2) Доменный адрес (DNS). 3) URL - адрес...
anara34 anara34  20.04.2020 14:25
Для какого из следующих слов истинно высказывание: НЕ(1-ая буква гласная) ИЛИ(2 буква согласная) И(предпоследняя буква согласная)? 1. Ямтхуд 2. Уиппет 3. Аиди 4. Азавак...
виола153 виола153  20.04.2020 14:24
Задание № 13 укажите правильный вариант описания двухмерного массива? A float a[2,3]; B int a[2][3]; C float a(2,3); D a: array [1..2, 1..3] of integer; E a: array [1..2,...
kristinazmataeva kristinazmataeva  20.04.2020 14:24
Чему равна переменная a после выполнения цикла...

Популярные вопросы