По в excel, простой вклад - 6%, капитализированный(сложный) вклад - 4%. начальная сумма - 500р отразить - id901957520200211 от bzl00956 11.02.2020 16:37

Question

Информатика: По в excel, простой вклад - 6%, капитализированный(сложный) вклад - 4%. начальная сумма - 500р отразить изменение величины каждого вида вклада для каждого месяца в течении трех лет

bzl00956 · Accepted Answer

Program task1;

const
n = 10;

var
a :array [1..n] of real;
i, j :integer;
min, k :real;

begin

for i:= 1 to n do
    readln(a[i]);

min:= a[1];
for i:= 1 to n do
    if a[i] < min then
    begin
      min:= a[i];
      j:= i;
    end;

k:= a[n];
a[n]:= a[j];
a[j]:= k;

end.

program task2;

const
n = 10;

var
a :array [1..n] of integer;
i, j, kol :integer;

begin

for i:= 1 to n do
    readln(a[i]);

kol:= 0;
for i:= 1 to n do
    if a[i] mod 3 = 0 then
      inc(kol);
for i:= 1 to n do
    if a[i] = kol then
    begin
      j:= i;
      break;
    end;
writeln(j);

end.

MOGZ ответил