Перевести программу с языка Си на язык Паскаль #include <stdio.h> #include <stdlib.h> #define nx (25) #define x(a,b) b a x(main,int)() { - вопрос №4555649

x(x(x([nx],[nx]),a),int);x(n,int);x(r,int);x(c,int);x((«n? „),printf); x((“%d»,&n),scanf);x((r=0;r < n ;++r),for) { x((c=0;c < n;++c),for) { x((r==c),if) a[r][c] = r; else a[r][c]=0;printf("%"«4»«d»,a[r][c]); } puts(""); } return(0); }

ноябрь 30, 2021 г.