На языке Паскаля. Задачи на цикл. Введите 20 чисел. Посчитайте среди них количество чисел, значение которых от 0 до 10.

Question

Владимир Нефедов

Информатика

4 июня, 23:43

На языке Паскаля. Задачи на цикл. Введите 20 чисел. Посчитайте среди них количество чисел, значение которых от 0 до 10.

+4

Ответы (1)

Знаешь ответ на этот вопрос?

Таисия Моргунова · Answer 1

program n1; var i, k, a:integer; begin for i:=1 to 20 do begin readln (a); if (a > = 0) and (a < = 10) then k:=k+1; / /k - счетчик чисел от 0 до 10 включительно end; writeln (k); end.