Question

1) определите, что будет напечатано в результате работы следующего фрагмента программы:
var k, s: integer;
begin
s: =0;
k: =0;
while k < 30 do begin
k: =k+3;
s: =s+k;
end;
write(s);
end.
2) при каком наибольшем введенном числе d после выполнения программы будет напечатано 150?
var n, s, d: integer;
begin
readln(d);
n : = 3;
s : = 38;
while s < = 1200 do begin
s : = s + d;
n : = n + 7
end;
write(n)
end.
3) исполнитель редактор получает на вход строку цифр и преобразовывает её. редактор может выполнять две команды, в обеих командах v и w обозначают цепочки цифр.
заменить (v, w)
нашлось (v)
дана программа для исполнителя редактор:
начало
пока нашлось (222) или нашлось (888)
если нашлось (222)
то заменить (222, 8)
иначе заменить (888, 2)
конец если
конец пока
конец
какая строка получится в результате применения ниже программы к строке, со-стоящей из 193 идущих подряд цифр 8? в ответе запишите полученную строку.

Answer 1

1) 165

2) 58

3) 8

1) цикл сработает 11 раз = > решаем через прогрессию

s = (a1 + an ) / 2 * n = (0 + 30) / 2 * 11 = 165 (или можно тупо посчитать по итерациям)

2) на нужно чтобы n = 150 => посчитаем сколько раз должен выполниться цикл (150 - 3) / 7 = 21

1200 / 21 = 57.14 округляем в большую сторону

3) У тебя строка из 193 восьмерок (8) программа 888 на 2 и 222 на 8 => 888 888 888 на 8 => 193 / 9 = 21 и еще 4 восьмерки => 25 дальше снова / 9  = 2 + 7 = 9 восьмерок которые заменяются на одну 8