Создать матрицу по образцу. Рисунка нет, но если вы имеете Паскаль, то в запущенной программе введите любую цифру, желательно, больше 3 и вы поймете.
---
program lab11;
var m:array[1..1000,1..1000] of integer;
x,i,j,n:integer;
begin
n:=1;
writeln('Введите разрядность матрицы');
read(x);
for i:=1 to x do
for j:=1 to x do
if i=j then begin write(n+1,'*',n); n:=n+1; end else write(0);
end.
---
У меня паскаль сразу выдает перемноженные результаты, хотя я для него в кавычки взял знак умножения. Почему он их игнорирует? Должно выходить, например, 2*3, а не 6.
Стоит FPC
Примечание:
Там именно такие кавычки ' ', а не " " =)
Сообщение 'Введите разрядность матрицы' пашет норм
Примечание:
program lab11;
var m:array[1..1000,1..1000] of integer;
x,i,j,n:integer;
begin
n:=1;
writeln('Введите разрядность матрицы');
read(x);
for i:=1 to x do
for j:=1 to x do
if i=j then begin write(n,'лол',n+1); n:=n+1; end else write(0);
end.
---
Он текст полностью игнорит
Примечание:
Nonridiculam, зачем там точку с запятой? Я открыл "контейнер"(begin - end) для перечисления нескольких операторов, т.е. в операторе выбора больше одного оператора быть не может для каждой из 2 ветвей(thue/false)
Примечание:
true/false*
Примечание:
program lab11;
var m:array[1..1000,1..1000] of integer;
x,i,j,n:integer;
begin
n:=1;
writeln('Введите разрядность матрицы');
read(x);
for i:=1 to x do
for j:=1 to x do
if i=j then begin write(n); n:=n+1; write('*',n); end else write(0);
end.
---
Даже если вставляю между операторами вывода присваивание, он все-равно перемножает. Жесть!!!
Примечание:
PetSerAl, похоже надо Турбо качать, чтобы я мог программу отредактировать. Сам код подозрительно выглядит.
RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.
Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.
Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.