1. с клавиатуры вводятся числа, 0 - конец ввода. - вопрос №1021678465 от 6506463 20.07.2020 04:47

Question

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

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