сервис вопросов и ответовРебят,срочно нужна ваша помощь,в информатике ноль,а задали такое задание,либо первый либо второй вариант
10-11 класс|
|
Прикрепленные изображения
Aleklimarenko
12 мая 2013 г., 18:41:43 (10 лет назад)
Malenkaya75
12 мая 2013 г., 21:03:23 (10 лет назад)
1. program primer;
const n=212;
var
a:array[1..n] of integer;
d,s,k:integer;
begin
randomize;
for i:=1 to n do begin
a[i]:=random(1000);
end;
for i:=1 to n do begin
d:=d+a[i];
writeln('сумма чисел равна',d);
end;
for i:=1 to n do
if a[i]<0 then s:=s+1 else k:=k+1;
writeln('Количество положительных ',s,' количество отрицательных ', k);
readln
end.
Ответить
Другие вопросы из категории
Имя Возраст Вася 12 Вася 14 Вася 12 Вася 12 Вася 12 Вася 12 Вася 14 Вася 10 Вася 10 Вася 14 Вася 14 Вася 12 Маша 10 Маша 12 Маша 10 Маша 12 Маша 12 Маша
12 Петя 10 Петя 14 Петя 10 Петя 14 Петя 10 Петя 12 Петя 12 Имя Возраст КОЛИЧЕСТВО Имя Возраст КОЛИЧЕСТВО Имя Возраст КОЛИЧЕСТВО Маша 10 10 Вася 10 Петя 10 Имя Возраст КОЛИЧЕСТВО Имя Возраст КОЛИЧЕСТВО Имя Возраст КОЛИЧЕСТВО Маша 12 Вася 12 Петя 12 Имя Возраст КОЛИЧЕСТВО Имя Возраст КОЛИЧЕСТВО Имя Возраст КОЛИЧЕСТВО Маша 14 Вася 14 Петя 14 Задание: нужно с помощью одной формулы посчитать из исходных данных в сиреневой таблице и занести в в желтые столбики "КОЛИЧЕСТВО" - количество Маш, Вась, Петь заданных возрастов
Читайте также
Зачет по информатике,нужна ваша помощь.
Какие информационные технологии есть в медицине?
Что такое телемедицина?
Где пригодятся знания компьютера мед.сестре?
НУЖНА ВАША ПОМОЩЬ!
1) Найти объем текста, записанного на языке, алфавит которого содержит 512 символов 16 символьного алфавита.
2) Информационное сообщение объемом 4 Кбайта содержит 4096 символов. Сколько символов содержит алфавит, при помощи которого было записано это сообщение?
3) Вычислить информационный объем текстового документа в Мбайт (с точностью до сотых) :
Книга рекордов Петербурга - 235 страниц, 60 символов в строке, 48 строк на странице.
Дан массив X(N).Найти среднее арифметическое элементов массива,значения которых заключены в интервале [-3;3]. Если эта величина больше
заданного числа Z,то найти сумму четных элементов,иначе- произведение нечетных элементов.
Друзья,очень нужна ваша помощь,пожалуйста,если Вы решили мне помочь-отпишитесь. Заранее спасибо!
Вы находитесь на странице вопроса "Ребят,срочно нужна ваша помощь,в информатике ноль,а задали такое задание,либо первый либо второй вариант", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.