Определите результат выполнения следующей программы var s:string I,j integer Begin S:=программа For i:=1 to i-1do write('') Writeln(s(i)) End Ebd.
А как следующая программа выдаст ответ, если она неправильно написана? ))