сервис вопросов и ответовРешите, пожалуйста
10-11 класс|
|
Заполнить массив из 13 элементов случайными числами в интервале [-200;100] и найти количество отрицательных элементов массива меньше-семи и больше -двадцати.
Заданиясот
16 июня 2015 г., 4:35:48 (8 лет назад)
Lera12345678
16 июня 2015 г., 5:19:49 (8 лет назад)
const n = 13;
var a : array [1..n] of integer;
i,k : integer;
begin
randomize;
for i := 1 to n do
a[i] := -200 + random(301);
k := 0;
for i := 1 to n do
if (a[i]<-7) and (a[i]>-20) then
k := k +1;
writeln (k);
end.
Ответить
Другие вопросы из категории
Повстречались три компьютерных дел мастера: программист Белов, web-дизайнер Чернов и системный администратор Рыжий. "Правда удивительно, то что один
из нас имеет черные, второй белые, а третий рыжие волосы, но ни у одного цвет волос не совпадает с фамилией", - сказал черноволосый. Бывает же такое...", - сказал программист Белов. А Какой цвет волос у системного администратора?
дан фрагмент программы
Y=0
FOR K:=15 DOWNTO 1 DO;
begin
Y=Y*K;
end;
напишите запись фрагмента программы, реализирующего алгоритм циклической структуры..
напишите пожалуйста полный ответ...))
в линейном массиве из шести целых элементов ,переставить все элементы в обратном порядке
помогите пожалуйста
дано 2 одномерных массива размером 20 ячеек первый массив заполнить случайными числами от 10 до 50 второй заполнить случайными числами от 30 до 90
первый массив отсортировать по возврастанию второй по убыванию посчитать среднее арифметическое повторяющихся чисел.
язык паскаль
можно написать алгоритм
Читайте также
Люди,прошу вас, помогите пожалуйста, я уже долго сижу над этой задачей,не могу решить,пожалуйста помогите! =(((
найти номер третьего положительного элемента в потоке из 10 чисел или сообщить,что трех положительных элементов нет. (Решать без массива)
Решите пожалуйста!
Это информатика, 10 класс
Вопросы на фотографии
Номера 5 и 6 не надо решать
Помогите решить пожалуйста, как решить не представляю, а сроки поджимают, информатичка съест:'( 16 задача у меня, там 3 задания. P.S.
там она говорит что надо решать в Excel.
помогите решить пожалуйста. по паскалю 1. а) вычисления значения функции у = 7х2 - 3х + 6 при любом значении х;
б) вычисления значения функции х = 12а2 + 7а — 16 при любом значении а.
2.
даны катеты прямоугольного треугольника. Найти его гипотенузу
Вы находитесь на странице вопроса "Решите, пожалуйста", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.