Регистрация
Чевапчичи
02.03.2021 01:36
Информатика
Есть ответ 👍

Надо дополнить программу,чтобы он искал решение в x столбце . program a1; var c: array[1..100, 1..100] of integer; a, b: array[1..100] of integer; i, j, m, n, k, d: integer; begin d: =0; k: =0; writeln('введите кол-во строк в массиве'); readln(n); writeln('введите кол-во cтолбцов в массиве'); readln(m); for i : = 1 to n do begin for j : = 1 to m do begin c[i, j] : = random(50); write(c[i, j]: 4); end; writeln; end; writeln; for i : = 1 to n do for j : = 1 to m do if (c[i, j] mod 2 = 0) and (c[i, j] mod 2 = 0) and (c[i, j] mod 3 = 0) then begin inc(k); a[k] : = c[i, j]; end; for i : = 1 to k do write(a[i]: 4); writeln; for i : = 1 to n do for j : = 1 to m do writeln; for i : = 1 to d do write(b[i]: 4); end.

300
500
Посмотреть ответы 2

Ответы на вопрос:

pandaokia
pandaokia
4,4(88 оценок)
Вопрос совершенно непонятен. какая должна быть решена? в программе - ошибки.
nestann
nestann
4,4(92 оценок)

a=int(input())

c=int(input())

x=int(input())

s=a*2+c*3-x

print(s)

Объяснение:

Популярно: Информатика