1. с клавиатуры вводятся числа, 0 - конец ввода. - вопрос №167914210 от daniilstepanov2 12.11.2022 15:54

Question

Информатика: 1. с клавиатуры вводятся числа, 0 - конец ввода. сколько положительных чисел ввели. 2. с клавиатуры вводятся двухзначные числа, до тех пор пока их сумма не превысит 200. сколько ввели чисел кратных 9? решить через паскаль

daniilstepanov2 · Answer

1) BeginCount:=0;repeatRead (ch);If ch 0 then inc(count);Until ch 0Write(count);End.2)BeginSum:=0;Count:=0;repeatRead (ch);Sum:=sum+ch;If ch mod 9=0 then inc(count);Until sum 200Write(count);End....