сервис вопросов и ответовPascal Дан массив А из n действительных чисел: a1, …, an. Вычислить:2(a1+…+an)2 Получить произведение элементов массива, кратных p.Заменить нулями
5-9 класс|
|
элементы, модуль которых при делении на p дает в остатке q.
акула1223
11 янв. 2014 г., 13:40:11 (10 лет назад)
2123sofya1232
11 янв. 2014 г., 15:02:51 (10 лет назад)
Пожалуйста, добавляйте подобные задания в раздел Информатика. Там оно найдет решение гораздо быстрее.
uses crt;
var a:array[1..100] of integer;
n,i,p,q,pr,w,s:integer;
begin
clrscr;
randomize;
pr:=1; w:=1;
write('p='); read(p);
write('q='); read(q);
write('n='); read(n);
clrscr;
writeln('Исходный массив: ');
for n:=1 to n do
begin
a[n]:=random(100)-50;
s:=s+a[n];
write(a[n],' ');
end;
w:=2*sqr(s);
writeln;
writeln('Новый массив:');
for n:=1 to n do
begin
if (abs(a[n]) mod p =0) and (a[n]<>0) then pr:=pr*a[n];
if (a[n] mod p=q)then a[n]:=0;
write(a[n],' ');
end;
writeln;
writeln('Значение выражения: ',w);
write('Произведение элементов массива, кратных ',p,': ',pr);
end.
Ответить
Другие вопросы из категории
1.Портной имеет кусок ткани длиной 12 м. Каждый день он отрезает по 2 м ткани. По истечении скольки дней портной отрежет последний кусок?
2.Верёвку разрезали на части. При этом сделали 6 разрезов. Сколько частей получилось?
СРОЧНО ,ПОЖАЛУСТА ПОМОГИТЕ С ТЕКСТОМ
"чи існує загроза збереженню національної культурної спадщини?"
Читайте также
Помогите сделать тест по обж ! 7 класс "Лавины,обвалы,оползни, сели"
1.Расположите в правильном порядке определение "Лавина"
1)массы снега,льда,горных пород
2)внезапно возникшее движение
3)предствавляющее угрозу для жизни и здоровья человека
4)вниз по склонам
2.К основному поражающему фактору лавины относится :
а)объм массы
б)огромная разрушительная сила
олучить,попав под действие лавины:
3.Из предложенных повреждений организма выберите то,которое нельзя получить,попав под действие лавины :
а)асфиксия
б)механические трамвы головы,внутренних органов
в)переломы
г)инсульт
д)ушибы
4.Основной характеристикой обвала является объем обвалившихся горных пород ; исходя из объема обвалы разделяются на :
Выберите неправильную классификацию
а)малые
б)средние
в)крупные
г)очень крупные
5.Обвал начинается :
а)внезапно
б)не внезапно
6.Обвал относится к движению грных пород:
а)с участием воды
б)без участия воды
7.На образование оползней влияют следующие факторы :
Выберите неправильный фактор
а)природные
б)антропогенные
вгеофизические
8.Селевые потоки возникают при одновременном проявлении трех природных условий (явлений) :
Выберите неправильные
а)наличия на склонах бассейна достаточного (критического) количества продуктов разрушения горных пород
б)колебания земной поверхности
в)накопления значительного объема воды для смыва (сноса) со склонов рыхлого твердого материала и последующего его перемещения по руслу
г)крутого уклона склонов и водотока
д)высокой температуры
1.что предсказывал Ломоносов в области астраномии?
2. какие идеи выдавал Лом. во блага России?
3.где родился?
4.в какой семье родился Ломоносов
5.каккие черты хар-ра и навыки преобрёл с детства.
6.кто из правителей России благоволил Ломоносову (какой бар он получил
7 в каких видах деятельности работал ломоносов?
Помогите! Пожалуйста!!! Технология!!! До понедельника надо сделать... 1)мерка(10 букв); 2) электроприбор для влажно-тепловой обработки
изделий(4 буквы);
3) элемент отделки одежды (6 букв)
4) поясное изделие 4 буквы
5) деталь одежды 6 букв
6) 1.середина ткани, сложенной пополам 4 буквы; 2. контрольная линия детали 8 букв
7)рабочая одежда 6 букв; у манекенщица хорошая 6 букв
8) долевой край полотна ткани
9) место соединения нескольких кусков ткани 3 буквы
10) чертёж изделия в натуральную величену 6 букв
11)изделие определённого фасона 6 букв
12)элемент украшения одежды 7 букв
13)чертёжный инструмент 6 букв
14)детали изделия, выполненые из материала 4 буквы
15)головной убор 7 букв
16)элемент модели одежды 7 букв
17)лента для отделки 6 букв
18)механизм для выполнения швов 6 букв
19)работник ателье 4 буквы
20)режущий инструмент для обработки ткани 7 букв
21)приспособление для выкройки 4 буквы; край детали 4 буквы
22)автор модели 3 буквы; средство для перехода выкройки на ткань 8 букв
23)наименование мерки 5 букв
24)средство для перехода выкройки на ткань 4 буквы
25)полотно, получаемое переплетением нитей 5 букв
Pascal, Бандиты Гарри и Ларри отдыхали на природе. Решив пострелять, они выставили на бревно несколько банок из-под пива (не больше 10). Гарри начал
простреливать банки по порядку, начиная с самой левой, Ларри — с самой правой. В какой-то момент получилось так, что они одновременно прострелили одну и ту же последнюю банку.
Гарри возмутился и сказал, что Ларри должен ему кучу денег за то, что тот лишил его удовольствия прострелить несколько банок. В ответ Ларри сказал, что Гарри должен ему еще больше денег по тем же причинам. Они стали спорить кто кому сколько должен, но никто из них не помнил сколько банок было в начале, а искать простреленные банки по всей округе было неохота. Каждый из них помнили только, сколько банок прострелил он сам.
Определите по этим данным, сколько банок не прострелил Гарри и сколько банок не прострелил Ларри.
Заранее спасибо.
в таблице дано число троллейбусных маршрутов в 10 крупнейш.городах
России.Москва-82.САНКТ-П-41.Нижн.Новгород-23.Челябинск-22.Уфа-21.Новосибирск-19.Екатеринбург-18.Самара-17.Омск-12.Казань-12.
1)найдите среднее арифметическое данного прибора.
2)найдите медиану данного прибора.
3)Какое из найденных средних лучше характеризует численность троллейбусных маршрутов крупного российского города?кратко обоснуйте свое мнение.
Вы находитесь на странице вопроса "Pascal Дан массив А из n действительных чисел: a1, …, an. Вычислить:2(a1+…+an)2 Получить произведение элементов массива, кратных p.Заменить нулями", категории "другой". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "другой". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.