Склавиатуры вводится 9 чисел.опеределить сколько из них больше первого. (паскаль)
unikornio
1
01.10.2019 17:30
0
Другие вопросы по теме Информатика
Selik1234
02.12.2019 22:26
kotikzxp
04.07.2019 00:10
DoKim01
08.04.2020 14:28
Докторгоспарарнери
29.11.2020 01:48
kostya2031
29.11.2020 02:42
Ega129
29.11.2020 02:59
Милана1245
29.11.2020 03:11
28номер
06.08.2019 08:00
Популярные вопросы
- Определите давление керосина на дно цистерны, если уровень керосина...
1 - Какое влияние оказала византия на развитие культуры и искусства?...
3 - Найди периметр прямоугольника, у которого одна сторона равна 16 дм,...
3 - Решить неравенство log в квадрате числа х по основанию 2 минус 3...
3 - Фермер собрал3ц60кг. четвёртую часть помидоров разложила ящики по...
3 - Решите уравнения: 1)216\y=12,2)948\y-12...
2 - Рассказ на тему я горжусь своей страной по желательно не слишком...
2 - Составить цитатный план по статье м.е салтыкова-щедрина когда читаешь...
3 - Переведи на язык 1.сколько тебе лет? мне 8 лет....
3 - Уякому из цых слив перше слово в якому прыкметнык а друге именнык...
2
var first, n, i, coun;
begin
read(first);
for i := 2 to 9 do begin
read(n);
if n > first then coun := coun + 1;
end
write(coun);
end