Php тілі қайда колданылады?

Question

Информатика: Php тілі қайда колданылады?​

leo310106 · Accepted Answer

1.
var
k, sum, n, i: integer;
A: array of integer;
begin
writeln('Введите размерность массива: ');
readln(n);
SetLength(A, n);
writeln('Введите K: ');
readln(k);
writeln('Введите ', n, ' элементов массива :');
for i := 0 to n - 1 do
begin
readln(A[i]);
if A[i] mod k = 0 then sum := sum + A[i];
end;
writeln('Результат: ', sum);
end.

2.
var
c, k, n, i: integer;
B, A: array of integer;
begin
k := 1;
writeln('Введите размерность массива: ');
readln(n);
SetLength(A, n + 1);
writeln('Введите ', n, ' элементов массива :');
for i := 1 to n do
begin
readln(A[i]);
if A[i] = 0 then
begin
inc(c);
SetLength(B, c + 1);
B[k] := i;
inc(k)
end;
end;
writeln('Позиции нулевых элементов: ');
for i := 1 to c do write(B[i]:3);
end.

Php тілі қайда колданылады?​

MOGZ ответил