1. Дан целочисленный массив из 30 элементов…

Question

1. Дан целочисленный массив из 30 элементов, которые могут принимать значения от 150 до 200 – рост учащихся выпускного класса. В баскетбольную командуберут тех, чей рост не менее 180 см. Напишите программу, которая подсчитывает число претендентов в состав баскетбольной команды и выводит номера подходящих кандидатур.

Answer 1

93

k0p4en

10 февраля 2023

Program Zn; var m: array[1… 30] of byte; c,i: integer; Beginfor i: =1 to 30 do beginwriteln ('Введите рост кандидата'); Readln (m[i]); if m[i]>=180 then inc (c) end; writeln ('Количество подходящих кандидатур: ',c); end. (Программа проверена и откомпелирована на Pascal.NET, если есть вопросы, пишите)

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: