Пупкин вася съедает ежедневно на 20 конфет больше, чем в предыдущий день, и ещё 2 конфеты. выведите на экран,через сколько дней количество съеденных конфет превысит 100, если в первый день съедено 12 конфет

Kuro111 Kuro111    2   23.06.2019 23:30    0

Ответы
Shizophren Shizophren  19.07.2020 17:20
Var a,b,c:integer;
begin
 a:=12;
 b:=1;
 while a<100 do begin
  a:=a+20+2;
  b:=b+1; 
  end;
 writeln('Через ',b,' дней Вася съест ',a,' конфет');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика