Изучите блок схему и напишите псевдокод задачи ​

Проанализируем последовательно утверждения.

Таблицу прилагаю

1. Если верно первое утверждение, то остальные

— неверны. Тогда получается, что две девушки

(Маша и Наташа) не празднуют день рождения

весной (из утверждений 2 и 4), т.е. обе празднуют

его осенью, что противоречит условию задачи.

2. Предположим, что верно утверждение 2

(У Маши день рождения весной, а у Кати -

осенью). В этом случае получается противоречие

в отношении времени рождения Вали: не зимой

(утверждений 1) и не летом (утверждений 3).

А осенью и весной родились Катя и Наташа

(утверждение 2).

3. Предположим, что верно утверждение 3 (У Вали день рождения летом, а у Наташи - весной). Тогда из утверждения 2 получаем: Маша родилась осенью, а Катя - зимой. Это не противоречит утверждению 1. Таким образом, получаем следующее распределение: Маша — родилась осенью, Катя — зима, Валя — летом, Наташа - весной.

Объяснение:

Сначала надо избавиться от ошибок (пункт №3)
иначе не сможем выполнить 1 и 2 пункт задания.
  Исправляем if N mod 10 k:=N mod 10; на if (N mod 10 < k) then k:=N mod 10;
  Исправляем N:N div 10; на N:= N div 10;
 
После исправления ошибок при вводе 537 получим 3
Программа будет работать правильно для любого числа,
у которого вторая цифра слева меньше первой цифры, например:
7193

Чтобы программа работала правильно для всех чисел надо
изменить это: while N > 10 do на while N > 0 do

После всех исправлений код программы стал таким:
var
  N, k: integer;
begin
  readln(N);
  k := 9;
  while N > 10 do
  begin
    if (N mod 10 < k) then k := N mod 10;
    N := N div 10;
  end;
  write(k)
end.