Напишите программу, которая принимает с клавиатуры числа, пока не будет введено значение 999. программа должна подсчитать, сколько значений было введено с клавиатуры (не считая значения 999) и вывести эту информацию на экран.
ksenia87109r675
2
20.05.2019 16:00
11
Другие вопросы по теме Информатика
Kuznecovaalexa2005
12.04.2021 19:06
bobr600
12.04.2021 19:05
оксана731
12.04.2021 19:05
azatbaykov00
03.12.2021 12:27
Sezimturatbeko
03.12.2021 12:29
leisalina4
29.07.2019 02:20
23050309
28.05.2019 14:00
hikita07
28.05.2019 14:00
Популярные вопросы
- Написать данные выражения на немецком в таблицу по 3 колонкам (1- продавец,...
3 - Разбор слова древнеримских...
2 - Andy Hoped that his friend...him with his car...
1 - Можете выполнить задания по ссылке от 5 по 8 https://resh.edu.ru/subject/lesson/1567/train/#200031...
1 - План до новели три зозулі з поклоном та зав язь ....
1 - 5Найди значения выражений.а) 700 700 – 6 054 . (47 923 – 47 884) — 65 548=б)...
3 - Тема урока: Размножение и развитие земноводных. Происхождение. Многообразие...
2 - Животных изображённые на гербах и флагов всех стран мира...
3 - Списать предложения, у частиц указать разряд. 1) Ни шагу назад! 2) Вот пришел...
2 - Халықаралық географиялық еңбек бөлінісінің қолайлы және қолайсыз жақтарын сипаттаңыз...
2
var n,count:integer;
begin
repeat
readln(n);
if(n<>999) then inc(count);
until(n=999);
writeln(count);
readln;
end.