Создать программу которая запрашивает ввод матрицы и выводит на экран количество элементов больше числа 3

@Кристина ш · Регистрация: 31.01.2011

Author24 — интернет-сервис помощи студентам

Создать программу которая запрашивает ввод матрицы(3*3) с клавиатуры и выводит на экран количество элементов больше числа 3.

@Puporev · 31.01.2011, 12:38

Pascal

uses crt;
const n=3;
var a:array[1..n,1..n] of integer;
    i,j,k:byte;
begin
clrscr;
writeln('Введите ',n*n,' элементов матрицы:');
for i:=1 to n do
for j:=1 to n do
 begin
  write('a[',i,',',j,']=');
  readln(a[i,j]);
 end;
clrscr;
writeln('Матрица:');
k:=0;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    write(a[i,j]:5);
    if a[i,j]>3 then k:=k+1;
   end;
  writeln;
 end;
write('Количество элементов, больше 3=',k);
readln
end.

@Кристина ш 42 / 0 / 0 Регистрация: 31.01.2011 Сообщений: 11
		1
	Создать программу которая запрашивает ввод матрицы и выводит на экран количество элементов больше числа 3 31.01.2011, 12:30. Показов 1795. Ответов 1 Метки нет (Все метки) Создать программу которая запрашивает ввод матрицы(3*3) с клавиатуры и выводит на экран количество элементов больше числа 3. 0

	31.01.2011, 12:38

Создать программу которая запрашивает ввод матрицы и выводит на экран количество элементов больше числа 3

Решение