Автор - vania6101
Ответ: программа выдаст 150, если в ней исправить ошибки. Текст исправленной программы представлен ниже:
var
n, s: integer;
begin
N := 4;
S := 0;
While n<= 13 do begin
S := s +15;
N := n+1;
End;
Write (s);
end;