Информатика: в алгоритм вставки сносок на стр. 138-141

в алгоритм вставки сносок на стр. 138-141

👇

Открыть все ответы

Ответ:

BrainS711

25.07.2021

хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз хз

4,5(97 оценок)

Ответ:

lllgglll

25.07.2021

Const
n = 10;

var
a: array[0..10] of integer;
i, s: integer;

begin

//Заполнение массива сл. числами

for i := 1 to n do
begin
    a[i] := random(201) - 100;
    write(a[i]:4);
end;
writeln;

//1) Все элементы не превышающие число 100

writeln('Не больше 100 ');
for i := 1 to n do
    if a[i] <= 100 then
      write( a[i]:4);
writeln;

// 2) Все четные элементы

writeln('Кратные двум ');
for i := 1 to n do
    if a[i] mod 2 = 0 then
      write( a[i]:4);
writeln;

// 3) Все элементы, являющиеся трехзначными числами

   writeln('Трехзначные ');
for i := 1 to n do
    if (a[i] < -99) or (a[i] > 99) then
      write(a[i]:4);
writeln;

// 4) Третий, шестой и т.д элементы.

i := 3;
writeln(' номера 3, 6, 9 и т.д.');
while i < n do
begin
    write(a[i]:4);
    i := i + 3;
end;
end.

4,8(27 оценок)

Это интересно:

Философия-и-религия

20.10.2020

Как облечься во Всеоружие Божие: наставление для верующих...

Кулинария-и-гостеприимство

13.05.2023

Как отчистить старые кастрюли быстро и безопасно...

Праздники-и-традиции

14.05.2020

Как наполнить рождественский чулок: идеи для украшения...

Кулинария-и-гостеприимство