Очень нужно =((

5-9 класс

Ребят, как сделать, чтобы..
Например чисел 10
Каждое второе (по порядку) выводить (да)
Каждое четвёртое (по порядку) выводить (нет)

(язык паскаль)

Tktyeirf 08 дек. 2013 г., 18:21:40 (10 лет назад)

Рейтинг

+ 0 -

Хороший вопрос

0 Жалоба

Ответить

+ 0 -

Vennomes

08 дек. 2013 г., 19:10:59 (10 лет назад)

var
a:array[1..100] of integer;
i, n:integer;
begin
randomize;
write('Введите количество элементов '); readln(n);
writeln('Исходный массив: ');
for i := 1 to n do
begin
    a[i] := random(21) - 10;
    write(a[i], ' ');
end;

writeln;
writeln('Вывод массива в соответствии с условием: ');
for i := 1 to n do
begin
    if i mod 4 = 0 then
       write('нет ')
    else
      if i mod 2 = 0 then
        write('да ')
      else
        write(a[i], ' ');
end;
end.

Хороший ответ

0 Жалоба Ответить

+ 0 -

Coolman1

08 дек. 2013 г., 20:01:58 (10 лет назад)

var
a:array [1..10] of integer;
i:integer;
begin
for i:=1 to 10 do
read (a[i]);
for i:=1 to 10 do
if i mod 4 =0
then write ('нет',' ')
else
if i mod 2=0
then write ('да', ' ')
else write (a[i],' ');
end.

вот вставьте, если не работет напишите

Хороший ответ

0 Жалоба Ответить

Ответить

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

ЛизаРо / 05 дек. 2013 г., 12:42:33

Определите, что будет напечатано в результате выполнения следующего алгоритма:

var a,b:integer;

5-9 класс информатика ответов 1

Lopatyx / 30 нояб. 2013 г., 18:09:51

Ответьте на вопросы:

1) Принципы обработки информации компьютером.
2) Компьютер и здоровье.

5-9 класс информатика ответов 1

Ruskhaustov / 27 нояб. 2013 г., 9:27:07

Найти любые алгебраические выржаения и первести их с математического языка на язык программирования.

Прошу помогите!!!! Очень надо.
ВОТ ЗАПИСИ В ТЕТРАДИ.

5-9 класс информатика ответов 2

G226g / 19 нояб. 2013 г., 22:41:08

1)Составить алгоритм для решения задачи: Вычислить угол между двумя векторами, если эти векторы заданы своими координатами.2)Составить

алгоритм для решения задачи: Найти действительные корни квадратного уравнения вида ax^2+bx+c=0.

5-9 класс информатика ответов 6

Russian102 / 08 нояб. 2013 г., 13:03:57

1 Автомат получает на вход трехзначное десятичное число. По полученном числу стрится новое десятичное числу по следующим правилам. 1 вычисляются два числа-

сумма старшего и с среднего разрядов а также сумма среднего и младшего разрядов заданного числа. 2 полученые два числа записываются друг задругом в порядке невозростания(без разделителей). Пример. Исходное число:277. Подразрядные суммы:9, 14. Результат:149. определите сколько из приведенных ниже чисел могут получиться в результате работы автомата 1616 169 163 1916 1619 316 916 116 В ответе запишите только количество чисел

5-9 класс информатика ответов 2

Очень нужно =((

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

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