Определите, что будет...

Тема в разделе "Информатика", создана пользователем deema, 27 мар 2010.

  1. deema

    deema New Member

    Определите, что будет напечатано в результате работы следующей программы. Var s, k: integer; Begin s:=50; for k := 1 to 9 do s :=s - 3 write(s);End.
     
    deema, 27 мар 2010
    #1
  2. Анжелла

    Анжелла New Member

    s = 50 
    k=1 s=50-3=47
    k=2 s=44
    k=3 s=41
    k=4 s=38
    k=5 s=35
    k=6 s=32
    k=7 s=29
    k=9 s=26
    Ответ: 26
     
    Анжелла, 27 мар 2010
    #2

Поделиться этой страницей

Наша группа