Сборник заданий для практических занятий по информатике. Крупенников О.Г - 57 стр.

UptoLike

56
BEGIN
CLRSCR;
FOR I:=1 TO 2 DO
FOR J:=1 TO 3 DO
BEGIN
WRITE (’ВВЕДИТЕ А[‘,I,J,’] :’);
READLN (A[I,J])
END;
FOR I:=1 TO 2 DO
FOR J:=1 TO 3 DO
BEGIN
WRITE (’ВВЕДИТЕ B[‘,I,J,’] :’);
READLN (B[I,J])
END;
WRITELN;
WRITELN (’РЕЗУЛЬТИРУЮЩАЯ МАТРИЦА S’);
WRITELN;
FOR I:=1 TO 2 DO
BEGIN
FOR J:=1 TO 3 DO
BEGIN
S[I,J]:= A[I,J]+B[I,J];
WRITE (S[I,J]:3,’ ’);
END;
WRITELN
END;
READKEY
END.
6.2. Задания к практическому занятию
1. Сортировочный автомат настроен на диаметр валов
D
в
н
, где В и Н
соответственно, верхнее и нижнее допустимые отклонения диаметра