Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

1) Составьте программу вычисления в массиве A(N) суммы всех чисел, кратных 3. 2) Составьте программу вычисления в массиве B(8) суммы отрицательных

5-9 класс

элементов. 3) Составьте программу вычисления среднего арифметического элементов массива. Пожалуйста.. очень надо!

Yulyaovcharenk 05 мая 2015 г., 21:31:05 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Titovaksusha
05 мая 2015 г., 22:13:50 (9 лет назад)

Я не стала каждый раз описывать массив, думаю с этим ты сама справишься

 

1) ....

s:=0;

  for i:=1 to n do 

 if a[i]mod 3=0 then s:=s+a[i];

writeln(s);

...

2)  ...

s:=0;

for i:=1 to n do

if abs(a[i])<>a[i] then s:=s+a[i];

writeln(s);

...

3) ...

s:=0;

for i:=1 to n do  s:=s+a[i];

s:=s/n;

writeln(s);

...

 

Ответить

Другие вопросы из категории

ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!

Был в тридесятом королевстве пруд,в центре которого рос один лист водяной линии.Каждый день число таких листьев удваивалось , и на десятый день вся поверхность пруда уже была заполнена листьями лилии.Сколько дней понадобилось, чтобы заполнить листьями половину пруда?

срочно плиз Два текста содержат одинаковое количество символов. Первый текст составлен из символов алфавита Мощностью 256 символов, второй

— мощностью 16 символов. Во сколько раз различаются информационные объёмы этих текстов?

Pascal ABC. Вводим четырёхзначное число, определить количество чётных цифр и вывести его на экран.

Пример:
Вход 1212
На выходе 2

Я сделал:
program Test;
uses Crt;
var A,B,C,D,E: integer;
begintextbackground(8);
clrscr;
textcolor(15);
write('Введите 4-х значное число: ');
textcolor(13);
read(A);
C:=A div 1000;
B:=A div 100;
B:=A mod 10;
D:=A mod 100;
D:=A div 10;
E:=A mod 10;
E:=A mod 10;
А как дальше не знаю =(

Читайте также

мне ооочень срочно нужно!!! пожалуйста помогите!!!!!!!!помогите решить 2 задачи по Ивт в Паскале: 1)составить программу вычисления в массиве A(

N) произведения нечетных элементов 2)Составьте программу вычисления в массиве B(N) максимального среди отрицательных элементов и его номера. заранее огромное спасибо! очень нужно!

одномерный массив

Составьте блок-схему алгоритма и программу вычисления в массиве A(N)
суммы всех чисел, кратных 3.



напишите программу, которая в последовательности натуральных чисел вычисляет сумму всех чисел кратных 7 и оканчивающихся на 0. Программа получает на

вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0- признак окончания ввода, не входит в последовательность), Количество чисел не превышает 1000. Введенные числа не превышают 30000. Программа должна вывести одно число: сумму всех чисел, кратных 7 и оканчивающихся на 0. Программу надо написать в Pascal

написать программу которая в последовательности натур. чисел определяет сумму всех чисел кратных 8 и оканчивающихся на 4.программа получает на вход

натур. числа а также их количество.количество чисел не превышает 1000.программа должна вывести одно число:сумму всех чисел кратных 8 и оканч. на 4
ПОМОГИТЕ, ПОЖАЛУЙСТАА

Пожалуйста помогите решить задачу: Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 6 и

оканчивающихся на 4. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число: сумму всех чисел, кратных 6 и оканчивающихся на 4.

Пример работы программы:

Входные данные Выходные данные

14 168

24

144

22

12

0



Вы находитесь на странице вопроса "1) Составьте программу вычисления в массиве A(N) суммы всех чисел, кратных 3. 2) Составьте программу вычисления в массиве B(8) суммы отрицательных", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.