*
*Купить рекламу
* ТОП РЕЙТИНГ С ОТДАЧЕЙ ОТ ПС
Обновить
1. * MRX_UA [автор] [11 Окт 2018 в 15:37] [отв] [цит] [под] [жал](0/0)
Нужно это сделать
Составьте программу, которая определяет количество чисел больших 10 и количество чисел меньших 20 среди 10 заданных.

Программу сохраняйте в файле с именем по образцу 10Ф_NN_Prg_01_3.pas
Добавлено 11.10.18 в 15:38:05:
наведите хоть какой то пример, чет нефига не понял
Добавлено 11.10.18 в 15:38:22:
........
Добавлено 11.10.18 в 15:39:15:
............
Файл №1: 64588_1rqtZ2msWno.jpg (157Kb)
Файл №2: 64588__bwYVp0IZrQ.jpg (167Kb)
2. * Sakamsky [11 Окт 2018 в 16:13] [отв] [цит] [под] [жал](0/0)
делаешь цикл, где перебираешь все числа, а внутри цикла проверки. после завершения цикла выводишь результат.
Статус: Мой статус без грубых оскорблений
3. * MRX_UA [автор] [11 Окт 2018 в 17:02] [отв] [цит] [под] [жал](0/0)
Sakamsky, Спс
4. * Tosyk [11 Окт 2018 в 17:39] [отв] [цит] [под] [жал](0/0)
program HelloWorld;

var
a, i, m1, m2: integer;

begin
m1 := 0;
m2 := 0;

for i:=1 to 10 do
begin
Read(a);

if a > 10 then
m1 += 1;

if a < 20 then
m2 += 1;
end;

Write('>10 = ', m1, ' | <20 = ', m2);

end.

http://tpcg.io/MyArpr
Изменено 1 раз. Посл. ред. * Tosyk (11 Окт 2018 в 17:40)
5. * MRX_UA [автор] [11 Окт 2018 в 19:08] [отв] [цит] [под] [жал](0/0)
Tosyk, Спс), шаришь в паскале?
6. * MRX_UA [автор] [11 Окт 2018 в 19:19] [отв] [цит] [под] [жал](0/0)
Tosyk, А это что /usr/bin/ld: warning: link.res contains output sections; did you forget -T?
7. * Tosyk [11 Окт 2018 в 19:28] [отв] [цит] [под] [жал](0/0)
Цитата:
MRX_UA: [b]Tosyk[/b], А это что /usr/bin/ld: warning: link.res contains output sections; did you forget -T?...
это на стороне сервера
8. * MRX_UA [автор] [11 Окт 2018 в 19:34] [отв] [цит] [под] [жал](0/0)
Tosyk, Ясненько, спс за помощь
Стр. 1
В теме: 0 человек, 45 заходили
* Скачать тему | * Файлы темы | * Фильтр сообщений
Онлайн: 18 из 15623
Последний: * neham
Служба поддержки
* Gix.Su - Магазин скриптов