Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
gusarova17
16.11.2021 08:31 •
Информатика
Составьте программу которая определяет, сколько слагаемых должно быть в сумме 1+2+3+ чтобы сумма оказалась а)больше 20 в кумире
Показать ответ
Ответ:
suskoahdvej5
08.10.2020 07:24
Program ddd;
var i,n,s,k:integer;
begin
write('Введите n: ');
readln(n);
s:=0; k:=0;i:=1;
while s<=n do
begin
s:=s+i;
writeln(i);
inc(i);
inc(k);
end;
writeln('Необходимо ',k,' слагаемых; сумма равна ',s );
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
EvaBonarmailmailru
19.09.2021 01:32
Написать конспект на тему типы данных...
Masha6655
08.07.2020 07:04
N-натуральное число f(1)=1 g(1)=1 f(n)=2*f(n-1)-g(n-1) g(n)=f(n-1)+2*g(n-1) g(5)-f(5)=?...
dasha1949
22.05.2021 22:24
10. определите значение переменной с после выполнения следующего фрагмента программы: a: = 5; a: = 12 - a*a; b: = -a; c: = 10*a - b; 11. определите значение переменной...
denisst105
11.08.2020 19:42
Преобразуйте следующее шестнадцатеричное число в десятичное: 4f...
Turtlrs
11.08.2020 19:42
Люди добрые (сделайте подробно) 1.какое количество информации получит игрок, которому из колоды в 32 карты достают короля пик? а если то же, но из колоды в 36 карт?...
blackstar19
11.08.2020 19:42
(сделайте подробно) 1.перевести десятичное число 125,68 в двоичную, восьмеричную, девятеричную и шестнадцатеричную форму. 2.перевести число 111011,0011012 в десятичную,...
аминат41
06.07.2022 17:51
Определите массу фосфорной кислоты, вступившей в реакцию с гидроксидом натрия, если количество образовавшейся воды равно 4.5 моль...
666Luc666
06.07.2022 17:51
Скільки залишків рибози містить рнк, що синтезована на фрагменті днк з 2400 ?...
olya75357
06.07.2022 17:51
Снижение цены на 10% к увеличению выручки на 8%. значение коэффициента точечной эластичности спроса но товар выберите один ответ. 1 -2 0,4 -1...
Arttfggg
06.07.2022 17:51
Вычеслите, объясните . (3^-4)^2*3^5...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,n,s,k:integer;
begin
write('Введите n: ');
readln(n);
s:=0; k:=0;i:=1;
while s<=n do
begin
s:=s+i;
writeln(i);
inc(i);
inc(k);
end;
writeln('Необходимо ',k,' слагаемых; сумма равна ',s );
end.