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

var k, s: integer;

begin

s:=0;

k:=0;

while k < 30 do begin

k:=k+3;

s:=s+k;

end;

write(s);

end.

Можно использовать формулу нахождения суммы арифметической прогрессии ((2a₁+d(n-1))/2)·n. a1 = 3; d = 3(шаг увеличения числа k); n = 10(кол-во повторений  цикла --> 30/3=10) --> ((2*3+3*9)/2)*10=165. Это и есть ответ

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.