Program summ; var i: byte; sum: integer; begin i := 10; while i < 99 do begin sum := sum + i; inc(i); end; write('Сумма всех 2-значных чисел: ',sum); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
