Ребятки, снова прошу помощи!))) Условие: Составьте блок-схему и программу на языке VBA, которая вычисляет частное от деления двух чисел. Программа должна проверять правильность введенных пользователем данных и, если они неверные (делитель равен нулю), выдавать сообщение об ошибке.
Я совсем не дружу с бейсиком(( Помогите пожалуйста! :)

uses crt;var a,b,n:integer;beginclrscr;writeln('Введите делимое:'); readln(a);writeln('Введите делитель <>0'); readln(b);n:=a div b;if b <> 0 then  begin n:=a div b; writeln('Ответь ',n); end else writeln('error 0');readkey;end.Если что паскаль

Sub z()x = InputBox("Введите делимое")Do  y = InputBox("y")  If y = 0 Then MsgBox ("Делить на 0 нельзя")  Loop Until y <> 0MsgBox ("s" & x / y)End Sub