Begin
writeln('Поздравляю с началом учебного года!')
end.
<em>// PascalABC.NET 3.2, сборка 1353 от 27.11.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(100,0,50); a.Println;
Writeln('S=',a.Sum)
end.
<u>Пример</u>
10 44 42 31 39 9 1 24 19 43 7 43 22 28 24 43 39 48 42 31 29 6 18 12 27 50 22 46 18 4 28 27 14 22 33 49 0 13 11 31 10 4 21 24 30 33 25 26 2 3 15 40 8 23 50 3 26 29 4 40 37 6 6 15 15 30 28 50 46 25 43 26 36 10 20 25 36 44 33 45 24 47 43 15 40 38 19 41 23 29 23 21 8 22 44 4 48 6 9 50
S=2595
Ответ:
http://lumpics.ru/change-size-of-slide-in-powerpoint/
Объяснение:
В языке С/С++ любое ненулевое значение считается истинным.
Цикл с заголовком while (a(x)) выполнятся до тех пор. пока a(x) ненулевое, следовательно, при выходе из цикла a(x)=0.
Первоначально х=1 и если a(1) окажется равным нулю, то тело цикла не выполнится ни разу. В этом случае у будет равен начальному значению, т.е. у=1.
Если же а(1) не равняется нулю, то будет выполняться тело цикла. При у<0 переменная х получает значение 2, у получает значение 10. Мы должны полагать что а(2) ложно и тогда произойдет выход из цикла. Если же это не так, то тело цикла будет выполняться повторно. Ветка при y>=0 дает присваивание х=1, а мы рассматриваем вариант, когда такое значение не приводит к выходу из цикла, следовательно у=20 никогда не будет последним присваиванием значения у. Тогда возможен только вариант ответа 1 (у=1 или 10)
<em><u>Ответ:</u></em> Вариант 1
