Регистрация
TyTToŪLLlkoJlbHuK
19.12.2022 14:49
Информатика
Есть ответ 👍

Заменить нулевые элементы массива b(18) в ячейках, номера которых кратны 3, цифрой 7

245
365
Посмотреть ответы 2

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

4Z1GGeR4
4Z1GGeR4
4,8(1 оценок)
Var b: array [1..18] of real; i: integer; begin for i: =1 to 18 do begin write('b[',i ,']=');   readln(b[i]); end; for i: =1 to 18 do writeln('b[',i ,']=',b[i]);   writeln('новый массив: '); for i: =1 to 18 do  begin if (i mod 3 =0) and (b[i]=0) then b[i]: =7; writeln('b[',i ,']=',b[i]);   end; readln; end.
moto5
moto5
4,5(19 оценок)

1)в случаях когда надо показать отношения чего-то к чему-то

2)они могут быть построены когда надо сравнить несколько данных и показать это наглядно

Популярно: Информатика