Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

Составить программу,которая формирует одномерный массив и выводит на экран все элементы,кратные 7.

10-11 класс

Mariazabyaka 24 апр. 2013 г., 8:20:05 (11 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Magicol
24 апр. 2013 г., 10:18:15 (11 лет назад)

const
n=10;
var
a:array[1..n]of integer;
i,k:integer;
    begin
        for i:=1 to n do
               begin
                   a[i]:=random(100);
                    write(a[i]:4);
                end;
writeln; 
           for i:=1 to n do
                if a[i] mod 7=0 then
                 begin
                      write(a[i]:4);
                      k:=k+1;
                 end;
if k=0 then
    writeln('нет кратных 7')
end.

          

Ответить

Другие вопросы из категории

Как создать в Excel формулу для:

А1 фамилия имя отчество
В1 и.о. фамилия

Помогите пожалуйста составить блок схему:

Найти сумму элементов первой и
третьей строк матрицы.

сравните числа 11011 (2) и 1511 (8)
HTML

Локальный сайт поделен на три фрейма, в одном из них кнопки. Как сделать так, чтобы при нажатии кнопки новая страница открывалась в соседнем фрейме на этой же странице, а не на новой?

Читайте также

эллементы массива вычисляются по формуле A(X,Y)=2X^2-Y^2 написать программу, которая выводит на экран значения элементов массива А(2,2).

подсчитать количество отрицательных элементов

сумму положительных элементов

ВЫВОДИТ НА ЭКРАН НОМЕРА ВСЕХ ЭЛЕМЕНТОВ, ЗНАЧЕНИЯ КОТОРЫХ =0

1.Составить программу, которая увеличивает каждый элемент настоящей таблице х [1 .. 10] на 1. 2. составить программу, замены положительных

элементов настоящей таблице х [1 .. 10] на 0.

3.составить программу, замены отрицательного элементов настоящей таблице х [1 .. 10] на их квадрат.

4.составить прогрумму, которая увеличивает на 2 все элементы настоящей таблице х [1 .. 10], которые больше 10.

Напишите прог-у на паскале... ПЛИИИИИИИИИИЗ 1)даны действительные числа a1, b1, c1, a2, b2, c2. Составьте программу, которая находит координаты точки

пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.

1. Написать программу, которая выводит на экран сумму средних арифметических значений двух вещественных массивов из 10 элементов.

2. Написать прогрумму,которая выводит на экран, разность значений двух вещественных массивов из 10 элементов.



Вы находитесь на странице вопроса "Составить программу,которая формирует одномерный массив и выводит на экран все элементы,кратные 7.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.