сервис вопросов и ответовПомогите исправить ошибки и написать блок-схему. Задание: Имеется массив А из N произвольных чисел, среди которых есть положительные,
10-11 класс|
|
отрицательные и равные нулю. Используя оператор цикла, составить программу, вычислить количество положительных и нулевых и сумму отрицательных.
Листинг программы:
Program Massiv;
Const n=10;
Var A:array [1..4] of integer;
I, c, c2, c3: integer;
Begin
For i=1 to N do begin
Readln (a[i]); If (a[i]=0 then inc(c)
Else if ([ai]<0) then inc(c2)
Else inc (c3);
End;
Writeln (`нулевые:`,c);
Writeln (`отрицательные:`,c2);
Writeln (`положительные:`,c3);
End.
цукенгшмиито
11 мая 2013 г., 4:41:15 (10 лет назад)
Frolyshev
11 мая 2013 г., 5:30:12 (10 лет назад)
uses crt;
var i,d,o,n,m:integer;
a:array[1..100] of integer;
begin
readln(n);
randomize;
for i:=1 to n do a[i]:=random(101)-50;
for i:=1 to n do begin
if a[i] < 0 then o:=o+a[i]
else inc(d);
if a[i] = 0 then inc(m);
end;
for i:=1 to n do write(a[i],' ');
writeln;
writeln('null = ',m);
writeln('otr = ',o);
writeln('pol = ',d);
readln;
end.
Ответить
Другие вопросы из категории
а7. Для какогг из указанных значений Х истинно высказысание
А8. укажите , какое логическое выражение равносильно выражению
Упростить логическое выражение и проверить правильность преобразований построением таблицы истинности для исходного и упрощённого выражений F=A∧B(над всем
выражением в верху чёрточка)&(A&B)(над В чёрточка)
написать программу переводящая заданную десятичную дробь в равную ей обыкновенную несократимую дробь,заданную числителем и знаменателем.
Входные данные Выходные данные:
0,375 3 8
1233434343427 1233434343427 1
17,(9) 18 1
Читайте также
1. Помогите исправить ошибки и нарисовать блок-схему. Задание: дана матрица целых чисел размером
4х4. Поменять местами первый и последний элемент массива х.
Листингпрограммы:
Написать программу в паскале: Даны целое n>0 и последовательность из n вещественных чисел, среди которых есть хотя бы одно отрицательное число. Найти
величину наибольшего среди отрицательных чисел этой последовательности.
Помогите пожалуйста! 1)Построить развлетвляющийся алгоритм, записать алгоритмы ввиде блок-схемы и на алгоритмическом языке. Треугольник задан
длинами своих сторон – a, b, c. Определить является ли
он тупоугольным, прямоугольным или остроугольным.
2) Построить циклический алгоритм, записать ввиде блок-схемы и на алгоритмическом языке.
Построить алгоритм, который определяет количество студентов в группе,
чей рост превышает среднее для группы значение.
Задание № 1) Разработать блок схему алгоритма, который проверяет, является ли четным введенное с клавиатуры число
Задание 2) Разработать блок схему алгоритма? для вычисления и вывода на экран суммы 5 случайных числе в диапазоне 0..36.
Нужно составить блок-схему алгоритма подготовки к сдаче к экзамену.
Я не могу сочинить этот "алгоритм", помогите ;)
Блок-схемы строить не надо, просто описать, что надо делать.
Вы находитесь на странице вопроса "Помогите исправить ошибки и написать блок-схему. Задание: Имеется массив А из N произвольных чисел, среди которых есть положительные,", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.