Ответы на вопрос:
Язык pascal, работа на массиве. с заполнением с клавиатуры. ты заполняешь 5 элементов ( через enter ), а он тебе выводит тоже самое, только с однерками вместо нулей. var x: array[1..5] of integer; var i,h: integer; begin for i: = 1 to 5 do begin; readln(h); if (h=0) then x[i]: =1 else x[i] = h; end; for i: =1 to 5 do begin; writeln('элемент номер ',i,' массива: ',x[i]); end; readln(x); end.
Популярно: Информатика
-
Annaanna200210.05.2020 08:20
-
kuppols13.01.2023 21:27
-
Dizig14.08.2020 19:03
-
Лолери22.11.2022 14:08
-
берик713.11.2021 05:01
-
SachaNabok17.07.2022 22:10
-
Юли00901.08.2022 17:50
-
Lolilolokigh28.12.2020 02:04
-
Aldiyar2607.10.2020 14:40
-
tokufoveru23.09.2020 04:04