Question

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

Var m,k: integer;

Begin

m:=0;

for k:=1 to 10 do

m:=m + k;

write(m);

End.

Answer 1

Будет напичатано вот что:

(Черточками выделю экран) 

-------------------

136101521283645

___________

Точно так, напечатает машина.

1) write - без ln, печатает все в одну строку.

2) Команда вывода стоит в самом цикле, поэтому выводяться все числа слитно.