М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
dsayui56
dsayui56
13.04.2021 12:44 •  Информатика

Задание по Паскалю/Phyton. В программе используется одномерный целочисленный массив A с индексами от 0 до 10. Значения элементов равны 5 7 2 3 4 6 5 5 6 4 т.е A[0]=5, A[1]=7 и т.д. определите значение переменной s после выполнения следующего фрагмента программы: Паскаль:
s:=0;
for i:=0 to 8 do begin
if A[i]>A[9] then
begin
t:=A[i];
A[i]:=A[8-i];
A[8-i]:=t;
s:=s+t
end
end;

👇
Ответ:
lianadoschik12
lianadoschik12
13.04.2021

ответ: 35

Объяснение:

Дан цикл для i от 0 до 8, который проходит по массиву A и смотрит: если элемент с индексом i больше последнего (с индексом 9), то переменную s увеличивают на элемент с индексом i, элемент с индексом i и элемент с индексом 8-i меняют местами.

5, 7, 2, 3, 4, 6, 5, 5, 6, 4      --- меняем, s=0+5=56, 7, 2, 3, 4, 6, 5, 5, 5, 4      --- меняем, с=5+7=126, 5, 2, 3, 4, 6, 5, 7, 5, 4      6, 5, 2, 3, 4, 6, 5, 7, 5, 4      6, 5, 2, 3, 4, 6, 5, 7, 5, 4      6, 5, 2, 3, 4, 6, 5, 7, 5, 4      --- меняем, с=12+6=186, 5, 2, 6, 4, 3, 5, 7, 5, 4      --- меняем, с=18+5=236, 5, 5, 6, 4, 3, 2, 7, 5, 4      --- меняем, с=23+7=306, 7, 5, 6, 4, 3, 2, 5, 5, 4      --- меняем, с=30+5=355, 7, 5, 6, 4, 3, 2, 5, 6, 4

Итак, как мы видим, после выполнения данного фрагмента программы, переменная s будет равна 35.

Пример работы:


Задание по Паскалю/Phyton. В программе используется одномерный целочисленный массив A с индексами от
4,8(44 оценок)
Открыть все ответы
Ответ:
рома1341
рома1341
13.04.2021
2.
var n,s,i:integer;
begin
writeln ('Программа, которая вычисляет сумму нечетных чисел от 11 и до n, задаваемого клавиатуры (n>11)');
write ('Введите n: ');
readln (n);
for i:=11 to n do
if i mod 2 = 1 then s:=s+i;
writeln ('Сумма нечетных чисел от 11 до ',n,' равна ',s)
end.

1.
var a,b:real;
begin
writeln ('Программа для решения уравнения ax=b');
write ('Введите a и b: ');
readln (a,b);
if (a=0) and (b=0) then writeln ('x - любое число')
else if (a=0) and (b<>0) then writeln ('решений нет')
else writeln ('x = ',b/a)
end.
4,4(97 оценок)
Ответ:
Катрин703
Катрин703
13.04.2021
Компьютерная и магнитно-резонансная томография - томографический метод исследования внутренних органов и тканей

Ультразвуковое исследование (УЗИ) - исследование органов и тканей с ультразвуковых волн.

Электронная очередь – это программно-аппаратный комплекс, позволяющий формализовать и оптимизировать управление потоком посетителей. Главная цель системы электронной очереди — целенаправленное направление посетителей внутри организации и получение информации о наиболее востребованных услугах, время их оказания и др.
4,6(9 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ