Цикл выполняется пока условие а + b < 10 истинно (да)
Действия в цикле:
а = а + 1
b = b + 2
а = 1
b = 1
а + b < 10 1 + 1 < 10 2 < 10 (да)
Действия в цикле:
а = а + 1 = 1 + 1 = 2
b = b + 2 = 1 + 2 = 3
а = 2
b = 3
а + b < 10 2 + 3 < 10 5 < 10 (да)
Действия в цикле:
а = а + 1 = 2 + 1 = 3
b = b + 2 = 3 + 2 = 5
а = 3
b = 5
а + b < 10 3 + 5 < 10 8 < 10 (да)
Действия в цикле:
а = а + 1 = 3 + 1 = 4
b = b + 2 = 5 + 2 = 7
а = 4
b = 7
а + b < 10 4 + 7 < 10 11 < 10 (нет)
Действия в цикле не выполняются
а = 4
b = 7
Цикл будет выполнен 3 раза
Спасибо
Ответ дал: Гость
100 кбайт = 100 * 8 = 800 кбит
800 : 1024 = 0,78125 мбит
0,78125 : 100 = 0,0078125 сек
Ответ дал: Гость
по введенному натуральному числу n(n< =100) обозначаешему количество ворон вывести надпись ,на дереве n ворон.где ворона склоняеться соответсвено n: 'ворон'.'ворона"вороны' в случаем n превышаюшего 100 вывести надпись 'ветка обламилась'
uses crt; var n : integer; begin clrscr; repeat write ( 'введите число от 1 до 100 n = ' ); readln (n ); until n> 0; case n of 11..14 : write ( 'сидело ' ,n , ' ворон' ); 1..10 ,15..100 : case n mod 10 of 1 : write ( 'на дереве сидела ' ,n , ' ворона' ); 2..4 : write ( 'на дереве сидели ' ,n , ' вороны' ); 0 ,5..9 : write ( 'на дереве сидело ' ,n , ' ворон' ); end else write ( 'ветка обломилась! ' ); end; readln; end.
Популярные вопросы