Тик бар эшне башкарырга кирәк булган тора. күрәсе килә, яки юк. һәр көнне. мәсәлән, мытье савыт-саба. бик күпләр яратмый моны, ә мин, яратам. һәм расскажу, ни өчен. юкка гына көнчыгыш халкыбызның гласит: "тәртип — йортында тәртип күңелдә, чисталык — йортында чисталык ятты". мин ре белән тулысынча килешәм бу халык мудростью. чөнки, чыннан да, бик авыр "тәртип урнаштырырга" күңелдә бар икән, сине түгел, убрано йортында да вымыта савыт-саба. разложишь барысы да фатирда буенча урыннарга — эчәсе белән шөгыльләнергә нәрсә дә булса кызыклы, уку, повышивать, гади присесть ял итәргә, вымоешь посуду — һәм ни дәрәҗәдә рәхәтрәк утырырга өчен чиста өстәле дә бар сверкающей чисталыгы савыт-саба.
bksenia9775
10.12.2020
Var i: integer; a,b,c: array[1..10] of integer; begin writeln('массив a: '); for i: =1 to 10 do begin a[i]: =random(10); if i mod 2=0 then c[i-1]: =a[i]; write(a[i],' '); end; writeln; writeln('массив b: '); for i: =1 to 10 do begin b[i]: =random(10); if i mod 2=0 then c[i]: =b[i]; write(b[i],' '); end; writeln; writeln('массив c: '); for i: =1 to 10 do write(c[i],' '); end.
ответ:
пошаговое объяснение: