сервис вопросов и ответовСоставить программу на языке Pascal
10-11 класс|
|
Дан одномерный массив, содержащий m элементов. Что больше: абсолютная величина произведения всех отрицательных элементов данного массива или сумма его положительных элементов?
Aikarturik
25 февр. 2015 г., 22:52:19 (9 лет назад)
Ваня345
26 февр. 2015 г., 0:00:32 (9 лет назад)
const
m=10;
var
i,s,p:integer;
a:array[1..m]of integer;
begin
write('Массив: ');
p:=1;
for i:=1 to m do
begin
a[i]:=random(-5,10);
write(a[i],' ');
if a[i]>=0 then
s:=s+a[i]
else p:=p*a[i];
end;
writeln;
if abs(p)>s then
writeln('Абсолютная величина произведения отрицательных больше суммы положительных')
else writeln('Абсолютная величина произведения отрицательных не больше суммы положительных')
end.
Ответить
Другие вопросы из категории
1. Для записи результатов игры "Зарница" используется таблица, в каждой клетке которой записано либо количество балов, полученных
командой в соответствующем состязании (1, 2, 3), либо прочерк (если команда в этом виде соревнований не участвовала). В "Зарнице" соревнуются 30 команд в 10 видах соревнований. Какое количество информации в битах содержит таблица?
2. Вася передает Пете сообщение, состоящее только из символов ( заглавных и строчных) латинского алфавита, пробелов и знаков препинания (. , ! ?) за 2 минуты. Сообщение состоит из 200 символов. Какова скорость передачи информации (бит в секунду) ?
13.На
остановке останавливаются троллейбусы с разными номерами. Сообщение о том, что
к остановке подошел троллейбус с номером №9 несет 4 бита информации.
Вероятность появления на остановке троллейбуса с номером №1 в два раза меньше,
чем вероятность появления троллейбуса с номером №9. Сколько информации несет
сообщение о появлении на остановке троллейбуса с номером №1?
14.Для
ремонта школы использовали белую, синюю и зелёную краски. Израсходовали
одинаковое количество банок белой и синей краски. Сообщение о том, что
закончилась банка белой краски, несет 2 бита информации. Синей краски израсходовали
6 банок. Сколько банок зелёной краски израсходовали на ремонт школы?
Четыре друга, Николай, Борис, ДмитрийЧетыре друга, Николай, Борис, Дмитрий и Максим живут в одном
дворе. Одному из них 12 лет, другому 14, третьему 16, самому старшему
19. Они все увлекаются программированием, но каждый из них
специализируется только на каком-то одном из языков программирования:
Бейсик, Паскаль, Си, Хаскел. Определите имя и любимый язык
программирования 14-ти летнего программиста, если известно, что:
Возраст Димы отличается от возраста любителя Си не более чем на 2 года.Специалист по Хаскелу старше любителя Си.Не менее чем один из приятелей родился между годом рождения Бориса и годом рождения Димы.Юноша, пишущий на Бейсике либо самый старший из друзей, либо самый младший.Коля не пишет на Бейсике и его возраст больше чем на 2 года отличается от возраста любителя Бейсика.Любитель Бейсика родился с разницей в 2 года со специалистом по Паскалю.Борис старше программиста на Паскале.Знаток Паскаля младше специалиста по Си.
В ответе сначала запишите первую букву имени 14-ти летнего
программиста, затем через пробел первую букву его любимого языка
программирования.
ПОМОГИТЕ, ПОЖАЛУЙСТА!!
Читайте также
Напишите на языках Pascal и C++ программу, которая генерирует 2 случайных вещественных числа и вычисляет их сумму, разность, произведение и
частное. Напишите на языках Pascal и C++ программу, моделирующую выбор одной из костей домино ( в наборе 28 костей домино, каждая состоит из двух половин, на каждой половине – от 0 до 6 очков). С помощью этой программы ответьте на вопрос: какова вероятность того, что выпадет кость с числом очков, кратным 3
1) Напишите пожалуйста программу (на языке BASIC) вычисления по длинам двух сторон треугольника и углу между ними длины третьей стороны и двух других
углов.
2)
Напишите пожалуйста программу (на языке BASIC) для определения подобия:
а) двух прямоугольников по двум смежным сторонам;
б) двух треугольников по трем сторонам.
Составить программу на языке паскаль
задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали
Помогите составить программу на языке PASCAL
В матрице X(5×5) определите произведение положительных элементов
главной диагонали.
Вы находитесь на странице вопроса "Составить программу на языке Pascal", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.