Укажите синтаксис цикла с постусловием на языке программирования visual basic. a) while< тело цикла> wend b) do whileloop c) doloop until d) doenddo

147

431

Посмотреть ответы 2

Ответы на вопрос:

misterstepash

Информатика

4,8(21 оценок)

С) do< тело цикла> loop until< условие>

BASS1111

Информатика

4,7(77 оценок)

Может так: var a,b,c: boolean; begin for a: =false to true do begin for b: =false to true do begin for c: =false to true do begin writeln ('1 zn'#9#9#9,'2 zn'#9#9#9,'a'#9,'b',#9,'c'#9); writeln('(a and b) and c'#9#9,'a and (b and c)'#9#9,'a=',a,' ','b=',b,' ','c=',c); if ((a and b) and c = a and (b and c)) then end; end; end; readln; end.