Здравствуйте!
5-9 класс
|
Информатика 9 класс.
задание.
Составьте программу, которая заполняет массив А[1..10] СЛУЧАЙНЫМИ ЦЕЛЫМИ числами в диапазоне от 1 до 10 и находит количество элементов, КОТОРЫЕ БОЛЬШЕ СВОЕГО СОСЕДА СПРАВА.
пример вывода:
Исходный массив:
10 2 4 1 3 5 7 8 2 7
Количество элементов, которые больше своего соседа справа=3
БУДУ ОЧЕНЬ БЛАГОДАРНА
const N=10;
var a:array [1..N] of integer;
k,i:integer;
begin
randomize;
for i:=1 to N do
begin
a[i]:=random(10)+1;
write (a[i], ' ');
end;
for i:=1 to N-1 do
if a[i]>a[i+1] then k:=k+1;
writeln('k= ', k);
end.
Другие вопросы из категории
е из них.
program zadacha6;
var a,b: real;
begin
readln(a,b);
if a>b then writeln ( ' a bolshe ' ) else writeln ( ' a menshee ' );
end.
Даны натуральные числа x и y вычеслить их произведение используя только операцыю сложения
Читайте также
Скажите пожалуйста
сколько битов в слове ? Конкретно в слове память? Сколько битов в одной букве или другом символе - например в цифре или в дефису ?
Спасибо
Дмитрий Титов
вот работа #13 Задание 1. Создайте папку с названием Лабораторная работа №13_ваша фамилия. Задание 2. Создайте три рисунка согласно вашему варианту в редакторе Paint и вставьте их в отчет. Задание 2. Создайте схему полусумматора двоичных чисел в редакторе Paint и вставьте ее в отчет.
Я не знаю как пользоваться программой GIMP
Нам задали нарисовать движущегося паучка, а я не знаю как это сделать
Не могли бы вы помочь по инструкции как это все сделать??
берег.У берега стояла лодка,которая могла вместить только двух человек.Купцы боязливо поглядывали на разбойников,так как знали,что во время переправы всякое случится.Если во время переправы на берегу число разбойников и купцов бкдет одинаковым то разбойники не тронут купцов,а если разбойников превысит число купцов хотя бы на одного человека,то разбойники убьют купцов.Сколько рейсов они сделают что бы переправится благополучно?За рейс следует считать движение лодки в одном направление.