Жила была девочка Настя.Она очень хотела научиться рисовать.В школе на уроках все смеялись над её рисунками и от того она приходила домой и плакала.Как то раз Настя пришла домой вся заплаканная,включила компьютер и тут на экран выскочил весёлый человечек:
-Не плачь ,милая девочка!Я помогу тебе!Я живу в твоём компьютере и всегда с умилением наблюдаю за твоими занятиями.Пойдём со мной!Не бойся !
Настя приложила свою руку к компьютеру и тут же оказалась по ту сторону экрана.......
Дальше, Анастасия, придумай пару предложений о путешествии их,если понравилась идея и на прощание человечек подарит Насте программу граф.редактор.И всё у неё будет хорошо
Незноппповвеоппакепппппаааееппмвв
Не real, а read:
for i:=1 to 10 do
read(A[i]);
Сколько раз вы выводите массив?
Потому что это что-то непонятное:
for i:=1 to 10 do
writeln (A[1],' ',A[2],' ',A[3],' ',A[4],' ',A[5],' '); (10 раз выводятся первые 5 элементов(?))
writeln (A[6],' ',A[7],' ',A[8],' ',A[9],' ',A[10],' ');
Если нужно вывести массив 1 раз:
for i:=1 to 10 do
writeln (A[i],' ');
2^i=N
4бита это i
2^4=16 этажей
Ответ:16этажей