Задача с массивами
 

помогите решить задачу на паскале:(:Для заданной целочисленной матрицы найти минимум среди сумм модулей элементов диагоналей, параллельных побочной диагонали матрицы.:(

задача на паскале
 

помогите пожалуйста:(:Для заданного натурального N определите первые N простых чисел:(

Что-то я вторую задачу понять не могу =( Поясни, плиз =)

А что там пояснять-то? Нужно ввести N и вывести первые N простых чисел.

[QUOTE=mister ratmir;284340]помогите пожалуйста:(:Для заданного натурального N определите первые N простых чисел:(
условие задачи такое же!там надо ее решать с процедурами!если не сможете эту не беда!главное хотя бы ту!пожалуйста!:(

AlexZir, пасибо. Понял задачу и осознал глупость своей просьбы:)

program ProstChisla
var N, i, a, j, x: integer
begin
clrscr;
writeln ("введите колличество необходимых простых чисел N=");
readln (N);
a:=3;
i:=3;
x:=0;
if N=0 do writeln ("простых чисел не найдено") else
if N=1 do writeln ("1") else
if N=2 do begin; writeln ("1"); writeln ("2"); end; else
writeln ("1");
writeln ("2");
while i<=N do
begin;
for j:=2 to a-1 do
if (a mod j<>0) then x:=x+1 else x:=x+0;
if x=0 then
begin;
writeln (a);
i:=i+1;
end;
a:=a+1;
end;
end.

Задача про простые числа. В синтаксисе языка могут быть ошибки. Проверьте на работоспособность

спасибо))))))))))

mister ratmir, отпишитесь хоть как программа, прошла/не прошла =)