Pascal и MatLab

[Maik2013]

Здравствуйте как можно этот код провести на MatLab, помогите мне в этом.

Используется синтаксис Pascal

program If1;
var
  N : Integer;
begin
  Write('Введите целое число: ');
  Readln(N);
  if N>0 then N:=n+1;
  writeln(N);
end.
 

[ShMaxG]

Запрос входных данных осуществляется с помощью функции input, см. справку:
http://www.mathworks.com/help/matlab/ref/input.html

Выводить число можно с помощью disp:
http://www.mathworks.com/help/matlab/ref/disp.html

[ewert]

ShMaxG в сообщении #927545 писал(а):

Выводить число можно с помощью disp:

Но вовсе не обязательно: команда X гораздо компактнее, чем disp(X)

[Maik2013]

ewert
ShMaxG
Спасибо.

Еще вопрос: While1. Даны положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Не используя операции умножения и деления, найти длину незанятой части отрезка A.

Используется синтаксис Pascal

var
  A, B: real;
 begin
    ///Ввод данных
  writeln('Введите положительные числа A и B (A > B):');  
  write(' A = ');
  readln(A);
  write(' B = ');
  readln(B);
    ///Основная программа
  while A >= B do //пока A >= B
    A -= B; //уменьшаем число A на B
  write('Длина незанятой части отрезка A: ', A)
end.
 

На MATLAB как найти этот символ

Используется синтаксис Pascal

 A -= B; //уменьшаем число A на B
 

[ShMaxG]

Maik2013
Такого символа или его аналога в Матлабе нет. Пишите просто

Используется синтаксис Matlab M

 A = A - B; 

[photon]

вообще-то задача решается в одну строчку:

Используется синтаксис Matlab M

rem(A,B)