Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
он более крепче
Объяснение:
/////////////////////////
program; var i: byte; str: string; begin for i: =60 to 70 do begin str: =str+chr(i) ; end; writeln(str); end.
1.
var n: integer; begin cls; for n: =1 to 10 do begin write('n=',sqr(n)+5,' '); end; end.
решить на паскале?
Популярные вопросы