1. с клавиатуры вводятся числа, 0 - конец ввода. - вопрос №167824010 от Anna7225 08.01.2022 03:07

Question

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

Anna7225 · 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....