Вводится 10 чисел (положительные). нужно подсчитать количество чисел меньше 10. на языке паскаль
147
437
Ответы на вопрос:
Program chisla; var mas: array(1..10) of real; (не указано, что должны быть только целые числа, поэтому real) k,i: integer; begin for i: =1 to 10 do write(mas[i]); //ввод массива read(mas[i]); k: =0; for i: =1 to 10 do if mas[i]< 10 then k: =k+1; writeln('количество чисел меньше 10', k); end.
Вмедицине (применяется в процессе обучения хирургов) в науке (для моделирования разных процессов ) в искусстве (компьютерная мультипликация) в развлечениях (компьютерные игры) в рекламирование (рекламные ролики )
Популярно: Информатика
-
ZinW17.09.2022 23:47
-
hickov200329.07.2020 07:02
-
tayteldiyev200526.10.2022 03:20
-
Beckonechnost27.06.2020 22:19
-
kartavaia0328.08.2021 04:33
-
Cat0911200521.08.2020 17:59
-
Lera03090428.11.2022 04:45
-
Данилкамастре31.03.2021 05:22
-
ilonaananko20019.02.2021 16:40
-
nastyyya429.04.2022 08:23