Определите, при каком наименьшем введённом значении переменной s программа выведет число 15. var s, n: integer;
begin
readln(s);
n := 5;
while s < 110 do begin
s := s + n;
n := n + 1
end;
writeln(n)
end.

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

• 

  KageyamaT

  07.07.2022 13:59
  Исправьте ошибку в программе program 1cl; var a: array[1..50] of integer;...
• 

  sasha1948

  21.06.2022 22:43
  Уисполнителя вычислитель две команды, которым присвоены номера: 1.умножь...
• 

  AbdurrahmanSam

  02.12.2022 07:06
  Скакого приложения можно снимать внутри экрана...
• 

  вико2006

  20.06.2020 19:12
  Текст составлен с использованием алфавита мощностью 64 символа и содержит...
• 

  yannappp1

  16.03.2021 04:58
  Определите скорость работы модема, если за 33 секунды он может передать...
• 

  Sasjaghf

  11.01.2021 20:01
  Подскажите ! сколько единиц в двоичной записи десятичного числа 92? сколько...
• 

  марго170

  11.01.2021 16:08
  Сформировать массив а[n][m] из случайно заданных элементов, значения которых...
• 

  maksgolovakha228

  29.12.2021 13:45
  Перегляньте сайт зелена хвиля (ecoclubua.com). Запишіть, які елементи сайту...
• 

  AsuWi

  19.01.2022 21:44
  Решить: 1. нужно равносильными преобразованиями каждую из следующих формул...
• 

  zeynab97

  29.11.2022 08:25
  Из предложений выберите то, в котором необходимо поставить запятую. (Знаки...