Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
13 сентября 2023 12:46
471
Определите, что напечатает программа. В ответе запишите числа в последовательности их вывода, без пробелов и разделителей.
A = Новый СписокЗначений;
A.Добавить("30");
A.Добавить("29");
A.Добавить("19");
A.Добавить("80");
A.Добавить("198");
Для i = 1 По A.Количество()-1 Цикл
Если i%2=1 тогда
F=A[i-1].Значение;
A[i-1].Значение = A[i].Значение;
A[i].Значение=F;
КонецЕсли;
КонецЦикла;
Для i = 0 По A.Количество() - 1 Цикл
Сообщить(A[i]);
КонецЦикла;
1
ответ
Остались вопросы?
Еще вопросы по категории Информатика
Какую роль выполняют языки в информационной деятельности человека?...
Петя случайно удалил значения некоторых ячеек электронной таблицы. Известно, что сумма чисел в каждой строке, каждом столбце и на обеих диагоналях оди...
Как информатика связанна с Эвм? Поколения Эвм? В каких отраслях труд человека целесообразнее заменить трудом эвм? Существует ли связь между информа...
Для хранения растрового изображения размером 640x480 пикселей без сжатия отвели 300 Кбайт памяти. Каково максимальное возможное число цветов в палитре...
Выдаёт ошибку (Встречено 'else', а ожидался оператор) Что делать?? Program R ; var a,b,c,x,D,x1,x2:real ; begin readln (a,b,c) ; D:= a*(x*x)+b*x+...