Заменить 0 на 5 и вывести индексы замен 3 0 5 --> 3 5 5
турбо паскаль ,
jartan
3
06.11.2019 11:15
1
Другие вопросы по теме Информатика
danypapajoy8eeo
18.05.2019 06:40
poroikovp
27.05.2019 02:20
Milkiskiss
25.10.2021 10:08
ПОМОГИТЕ1111121
25.10.2021 10:10
arinaplatonova1
25.10.2021 10:10
DobinaDaria1
25.10.2021 10:16
padpirigov0
25.10.2021 10:17
azbyka1234567890
29.04.2020 22:52
Георгий07
29.04.2020 22:52
Популярные вопросы
- 70. 1) Сравните пословицы. Что в них общего? Чем они различаются?...
2 - Литературный диктант Зима Есенина...
2 - 9 класс Паскаль Составить таблицы трассировки, в ответе записать,...
3 - Наведіть формули речовин, у яких ступені окиснення Гідрогену...
1 - Процес забезпечення безперервності видів називається...
2 - Новела «Сойчине крило» має відкритий фінал. Напишіть власне...
3 - Текст песни одного разу під Полтавою ?...
1 - Варіант 1 1.Односкладним є речення: А І Воздвиженський, і Дашкович...
1 - Кусок льда массой 1 кг нагревают от −28°C до −6°C, затрачивая...
2 - Чему будет равен потенциал шара радиусом 3 см, если ему сообщить...
2
program test;
var a,: array [1..10] of integer;
i: integer;
begin
for i:=1 to 10 do
readln (a[i]);
for i:=1 to 10 do
if a[i] = 0 then begin a[i]:=5; write(i:3); end;
end.