6) Определите, что будет написано в итоге работы последующего куска программки:var

6) Обусловьте, что будет написано в итоге работы последующего куска программки:

var n, s: integer;
begin
s := 0;
for n:=4 to 13 do begin
s := s + 15;
end;
write(s)
end.

5) Определите значение переменных a и b после исполнения последующего куска программки:

a := 2468;
b := (a mod 1000)*10;
a := a div 1000 + b;
Выведите значения а и b через пробел.\

4) Определите, что будет написано в итоге работы последующего куска программы:
var k, s: integer;
begin
s:=0;
k:=0;
while s lt; 100 do begin
s:=s+k;
k:=k+4;
end;
write(k);
end.

Задать свой вопрос
1 ответ
6. Цикл for выполнится 10 раз (значение n от 4 до 13), и каждый повтор к s будет прибавляться 15. То есть после выполнения s=150

5.
a := 2468;
b := (a mod 1000)*10 
a mod 1000 - остаток от деления 2468 на 1000, то есть 468.
b = 468*10 = 4680

a := a div 1000 + b;
a div 1000 - дробление 2468 на 1000 с остатком, то есть 2
a = 2 + b = 4680 + 2 = 4682

Ответ: 4682 4680

4. Цикл while производится, пока s lt; 100, и каждый повтор цикла s возрастает на k, при этом k каждый повтор цикла возрастает на 4. То есть 

1 повтор цикла: s = 0, k = 4
2 повтор цикла: s = 4, k = 8
3 повтор цикла: s = 12, k = 12
4 повтор цикла: s = 24, k = 16
5 повтор цикла: s = 30, k = 20
6 повтор цикла: s = 50, k = 24
7 повтор цикла: s = 74, k = 28
8 повтор цикла: s = 102, k = 32, условие перестало производиться, цикл завершился.
k = 32
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт