Регистрация
49583
21.02.2023 12:59
Информатика
Есть ответ 👍

Программа случайным образом генерирует однозначные числа (все числа вывести на экран). эти числа последовательно суммируются. определить количество чисел, когда их сумма превысила 100.

223
440
Посмотреть ответы 3

Ответы на вопрос:

okda2
okda2
4,6(70 оценок)
Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin   randomize;   var (s,k): =(0,0);   repeat       s+=(random(1,;       k+=1   until s> 100;   writeln(newline,'количество чисел равно ',k) end. пример 6 3 4 7 8 8 1 2 3 6 5 3 2 9 9 7 1 5 5 4 8 количество чисел равно 21
kghjg
kghjg
4,6(5 оценок)
Var a,b,count: integer; begin while (a< 100) do begin b: =random(9); writeln(b); inc(a,b); inc(count); end; writeln('кол-во: ',count); end.
ksenia6234
ksenia6234
4,8(27 оценок)
Впапке могут храниться в) фойлы и папки

Популярно: Информатика