Другие вопросы по теме Информатика
spritemax11
01.10.2021 02:12
BorzikovaLiza5
01.10.2021 02:07
tima14priluki
01.10.2021 02:04
merey221
01.10.2021 02:01
samira124
01.10.2021 01:57
mutsienietse14
17.03.2019 07:29
romak3104Ромчук
17.03.2019 07:33
Альба294
17.03.2019 07:49
subbotina17
08.08.2019 14:30
Популярные вопросы
- Чим вам запамятався(чим вас вразив) твір і мертвив, і живим, і ненародженним......
2 - X + 3x = 0 Решите, вкусные...
3 - Определи, какое количество теплоты пойдёт на нагревание воды от 13°C до 26°C в...
3 - В фильме ҚАЗАҚ Батырлары Кайрош какой ребёнок?...
1 - Трансформуйте в речення з непрямою мовою. «Кого ж ти, княже, залишиш замість себе...
3 - Алкандардың жалпы формуласы... 2. Радикал метил жазылады 3. Гомологтар ұқсастығы......
1 - It(to rain) now. 6 Yesterday I ( to watch) a very interesting film. 7 What time...
2 - При яких значеннях х квадратний тричлен -х² - 4х + 1 приймає найбільше значення?...
1 - Постройте образ куба при осевой симетрий относительно:несущей прямой диагонали...
2 - 1 Complete the words in the sentences. 1 The largest area of r f t in the world...
3
Объяснение:
program zadan;
const n=10;
var a:array [1..10] of integer;
i:integer;
begin
i:=1;
while i<=10 do
begin
write('a[i]= ');readln(a[i]);
i:=i+1;
end;
end.