Program char; var s,k: integer; begin s=100; for k:=0 to 10 do s:=s-5; writeln(s); end.
А что сделать то надо?)
определите, что будет напечатано в результате работы следующей программой
Ну, в ней ошибка :D В четвертой строке не хватает двоеточия.
А так, программа выдает 45
спасибо
Это можно посчитать так: в цикле 11 действий, каждое действие уменьшает s на 5, получается 100-11*5=45