Программу оформить в паскале)
Даны натуральное число n и целые числа . Выяснить, верно ли, что количество тех чисел , которые меньше 20, равно пяти.

Есть ответ
17.12.2022
114

Ответ


Program p1;Var: menee_dvadcati,n,i,x:integer;Begin

x:=0; //обнуляем x Readln(n);//считываем n For i:=1 to n do Begin Readln(x);//ввод числа If x5 then   //проверка (больше 5?) Writeln('Да') else Writeln('Нет');End.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.