напишите программу которая в последовательности натуральных чисел определяет количество чётных отрицательных чисел. В ПАСКАЛЕ, заранее спасибо)
5-9 класс
|
var
i, n: integer;
s: byte;
arr: System.Collections.Generic.List<integer> := new System.Collections.Generic.List<integer>();
begin
write('Enter a number of values: ');
readln(n);
for i := 0 to (n - 1) do
begin
arr.Add(random(-50, 50));
write(String.Format('[{0}] => {1}; ', i, arr[i]));
if ((arr[i] < 0) and (arr[i] mod 2 = 0)) then
s += 1;
end;
writeln(System.Environment.NewLine, '> ', s);
end.
Другие вопросы из категории
записана вместо нее ?
(Через цикл repeat,until)
Клавиатура,
джойстик, сканер, принтер.
Монитор,
графопостроитель, принтер, мышь.
Жесткий диск,
flash-память, компакт-диск, процессор.
Принтер,
акустические колонки, наушники, микрофон.
Системный блок,
центральный процессор, оперативная память, жесткий диск, блок питания.
Системный блок,
клавиатура, мышь, монитор, акустические колонки.
Видеокарта,
карта расширения, звуковая карта, сетевая карта.
Enter, End, Esc,
Delete.
Цветной принтер,
лазерный принтер, матричный принтер,
струйный принтер.
Нужно составить программу для вычисления а в n-ой (энной) степени, где а, n - числа, введенные с клавиатуры. Желательно с постановкой задачи
Читайте также
ихся 0 или 1.
Программа получает на вход целые числа от -3000 до 3000.
2)Напишите программу,которая в последовательности целых чисел вычисляет среднее арифметическое среди двухзначных чётных чисел,делящихся на 3.
НУЖНО СЕГОДНЯ! 66 БАЛЛОВ!
кратна 3. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
оканчивающихся на 4. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число: сумму всех чисел, кратных 6 и оканчивающихся на 4.
Пример работы программы:
Входные данные Выходные данные
14 168
24
144
22
12
0
на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
2)Найти среднее арифметическое всех целых чисел от a до 200 (значения a и b вводятся с клавиатуры; a>=200);
в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 4. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число – количество чисел, кратных 4.