Сделайте таблицу трассировки . запишите значение переменной s, полученное в результате работы след программы: var s, k: integer ; begin s: =0; fir k: =6 to 12 do s: =s+10; writeln(s); end.

в итоге s = 70

трассировка

1 шаг k = 6;   s = 10

2 шаг k = 7; s = 20

3 шаг k = 8 s = 30

4 шаг k = 9;   s = 40

5 шаг k = 10; s = 50

6 шаг k = 11 s = 60

7 шаг k = 12 s = 70

12) var a: array[1..7] of integer; k: integer; begin randomize; for k : = 1 to 7 do a[k] : = random(5); write("vvedite den' nedeli: "); readln(k); if (k < 1 or k > 7) writeln("error"); else if ( a[k] < > 0) then writeln("segodnya urokov: ", a[k]); else write("vyhodnoy"); end. 13) var k: real; begin write("vvedite chislo: "); readln(k); if (k > 0) then write("polozhitel'noe, "); else if (k < 0) then write("otricatel'noe, "); else write("nol', "); if (k mod 1 < > 0) then write("neceloe, "); else write("celoe, "); if (k mod 2 < > 0) then writeln("nechetnoe"); else writeln("chetnoe"); end.

Не знаю, причем тут "понятность" - это субъективное понятие, сильно зависящее от уровня подготовки читающего текст программы. "точность" тоже под вопросом, поскольку большинство алгоритмов сами по себе не некоей абсолютной точностью, а программы - суть запись алгоритма на некоем языке, доступном компилятору. также, на мой взгляд, тут не перечислены некоторые иные важные свойства программы. но в наибольшей степени на ответ, который тут может считаться "правильным", претендует 4) однозначность, дискретность, точность, понятность, результативность, массовость. ответ: 4)