В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
suhrobiddin98
suhrobiddin98
19.03.2023 23:37 •  Информатика

Проанализируйте работу программы. program math; var у: integer; begin while x<5 do begin end; end. ответьте на вопросы. 1) Сколько раз исполнится тело цикла? 2) Какое значение примет х после завершения про- граммы? 3) Какое значение примет у после завершения про- граммы? 4) Сколько раз исполнится тело цикла, если изменить условие на х<-5? 5) Сколько раз исполнится тело цикла, если изменить условие на х>-5? 6) Сколько раз исполнится тело цикла, если изменить условие на х>0? 7) Что произойдёт, если из тела цикла убрать команду 8) Сколько раз исполнится тело цикла, если изменить команду х:3х+1 на х:-х+2? 9) Сколько раз исполнится тело цикла, если изменить команду х: 3х+1 на х:-х-1?​


Проанализируйте работу программы. program math; var у: integer; begin while x<5 do begin end; end

Показать ответ
Ответ:
tanya2017kazanova
tanya2017kazanova
10.09.2022 00:45
Const
    auto = true;

var
    a: array[1..100, 1..100]of real;
    b: array[1..100]of real;
    n, m, j, i: integer;
    gmax, min, max: real;

begin
    read(n, m);
    for i := 1 to n do
        for j := 1 to m do
        begin
            if auto then
                a[i, j] := random(100)
            else           
                read(a[i, j]);
               
            if abs(gmax) < abs(a[i, j]) then
                gmax := a[i, j];
        end;
   
    for i := 1 to n do
    begin
        min := a[i, 1] / gmax;
        max := a[i, 1] / gmax;
       
        for j := 1 to m do
        begin
            a[i, j] := a[i, j] / gmax;
            if min > a[i, j] then min := a[i, j];
            if max < a[i, j] then max := a[i, j];
           
            write(a[i, j]:5:2, ' ');
        end;
       
        b[i] := max - min;
        writeln(' => ', b[i]:5:2);
    end;
end.
0,0(0 оценок)
Ответ:
HeU3BecN0cTb
HeU3BecN0cTb
19.03.2023 18:54
1-я задача: 3-х литровым кувшином наполняем кувшин 8 л. После 3-го наполнения в 
3-х литровом кувшине останется 1 литр. Затем опорожняем 8 литровый кувшин, с 3-х литрового кувшина переливаем один литр в 8-литровый, и туда -же наливаем два раза по 3 литра - получаем 7 л. 
2-я задача: Песочные часы (3-х минутные и 8 минутные) нужно включить за 8 минут до начала приготовления. Через каждые 3 мин переворачиваем 3 минутные часы. По истечении 8 мин, 3-х минутные песочные часы отсчитают 2 мин. В этот момент нужно начать готовить эликсир, через минуту, переворачиваете 3-мин часы и отсчитываете ещё шесть минут (2 раза по 3 мин) . Вот и получите 7 мин!
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота