Написал вот такой код. В чем ошибка, не пойму. В паскале я сижу 2дня, не серчайте.

Если что, ошибка в begin, просит поставить end в конце, но когда я ставлю ошибку выдает. Помогите....

Думаю пикабу возможно не место для этого, но нужна помощь. Если кому-то не трудно, можете написать на паскале
Этот ппример г)

И любой из этого чисто ради примера

Была бы очень благодарна за вашу помощь. Просто не особо математик, да ещё и на паскале нормально работа последний раз в школе. Опять же извиняюсь за этот ненужный никому пост 😟

На делфи написал программу которая позволяет рисовать как в Паинте ! А потом преобразует рисунок в программу АВС ! Которая в свою очередь рисует этот же рисунок. Зачем это надо ? А фиг его знает ). Оказалось нужно нерадивым студентам, которых преподаватель заставляет писать программы рисующие что либо.

До этого была написана программа преобразующая код в блок схему, а так так она работала только с кодом паскаля, то и потом написал кучу программ преобразующих код vba в паскаль.

Еще написал программы автоматически комментирующих каждую строчку кода (опять же из-за любви  к студентам), так как преподаватель даже в моем вузе требовал наличия комментария к каждой строке кода. А что делать если ты написал скажем 2000 строк кода на ассемблере, а комментариев там не так много ? А курсовой сдавать уже завтра ? Вот.. Теперь понимаете ! Или если ты вообще не разбираешься в ассемблере, работа чужая.. ну вы поняли. Справедливости ради стоит сказать что применять ее можно если ты хочешь понять что делает этот код. Я имею в виду базовые команды, к примеру mov - всем программистам понятно что оно делает, но не студентам.. Блоки кода и логику работы такая программа к сожалению не может объяснить, но преподаватели это и не требуют (по крайней мере у меня).

Ну и для студентов которым нужно прям завтра выучить новый язык программирования составил справочник команд на русском языке. Отличие от других справочников в том что в моем все рассчитано на человека вообще ноль в программировании. Например разделы озаглавлены так - работа с оперативной памятью, графика, файлы и т. д.  Кстати составлял более 5 лет, более 50 000 команд. Сначала я хотел уместиться в 10 мб, но увы.. В прямом смысле слова трясся над каждой буквой что бы уменьшить размер. Описание каждой команды - в среднем три, четыре слова. В отличие от учебников, где одно введение занимает две странички..

Вот вам пример

Открыть dvd привод - mciSendString('set cdaudio door open wait',nil,0,0); // uses , mmsystem;

Ниже пара скриншотов моей программы рисовалки-преобразовалки, кстати прикольно, я где то час с ней забавлялся, а написана она была за 20 минут. Если интересно буду публиковать такие посты, например о справочнике по программированию или преобразовании кода в блок схемы.

package ru.bugrimov;

import java.util.Random;

import java.util.Scanner;

public class Main {

public static void main(String[] args) {

Scanner scanner = new Scanner(System.in);

System.out.print("Введите N: ");

int n = scanner.nextInt();

System.out.print("Введите M: ");

int m = scanner.nextInt();

int[][] array2D = new int[n][m];

int[] array1D = new int[n * m];

int index = 0;

final Random random = new Random();

for (int i = 0; i < n; i++) {

for (int j = 0; j < m; j++) {

array2D[i][j] = (random.nextInt(20) - 9);

if(array2D[i][j] < 0) {

array1D[index++] = array2D[i][j];

}

System.out.printf(" [%2d]", array2D[i][j]);

}

System.out.println();

}

System.out.println("\n Результат: ");

for (int i = 0; i < index; i++) {

System.out.printf(" [%2d]", array1D[i]);

}

System.out.println();

}

}