Талдау Компютер бөлмесінде орналасқан компьютерлержің бірінен Word және WordPad программаларын компютер бөлмесінде орналасқан компьютерлержің бірінен Word және WordPad программаларын салыстырыңдар.Қайсысынжа ПГИ ыңғайлы? ПГИ ыңғайлы? Екі прграмма интерфейсінің 3 айырмашылығы мен 3 ұқсастығын атаңдар
var n,i,j,l,sum,min:integer;
a:array[1..20,1..20]of integer;
begin
clrscr;
write('n=');
readln(n);
randomize;
Writeln('Ishodnaja matrica:');
for i:=1 to n do begin
for j:=1 to n do begin
a[i,j]:=random(10);
write(a[i,j]:3);
end;
writeln;
end;
For l:=1 to 2*n-1 do
begin
sum:=0;
if l<=n then
begin
for i:=1 to l do
for j:=1 to l do
if j=l-i+1 then sum:=sum+a[i,j];
if sum<min then min:=sum;
end
else if l>n then
begin
for i:=l-n+1 to n do
for j:=l-n+1 to n do
if j=l-i+1 then sum:=sum+a[i,j];
if sum<min then min:=sum;
end;
writeln('Summa diagonali ',l,' = ',sum);
end;
writeln;
readln
end.
#include <stdio.h>
#include <stdlib.h>
int main()
{
int N; // Размер массива
int i; // Индекс
system("chcp 1251 > nul"); // Кодировка
printf("%s", "Введите N: ");
scanf("%d", &N);
int A[N];
printf("%s %d %s\n" , "Введите", N ,"элементов:");
for(i = 0; i < N; i++)
{
scanf("%d", &A[i]); // Считывание элем. массива, сравнение и присвоение
if (A[i] > 0) A[i] *= 2;
if (A[i] < 0) A[i] = i;
}
printf("%s", "Результат: ");
for(i = 0; i < N; i++)
printf("%d ", A[i]);
sytem("pause"); // Пауза
return 0;
}