DIM S, N AS INTEGER
S = 0
N = 75
WHILE S + N < 150
  S = S + 15
  N = N - 5
WEND
PRINT N

s = 0
n = 75
while s + n < 150:
 s = s + 15
 n = n - 5
print(n)

алг
нач
 цел n, s
 s := 0
 n := 75
 нц пока s + n < 150
  s := s + 15
  n := n - 5
 кц
 вывод n
кон

var s, n: integer;
begin
 s := 0;
 n := 75;
 while s + n < 150 do
 begin
  s := s + 15;
  n := n - 5
 end;
 writeln(n)
end.

#include <iostream>
using namespace std;

int main() {
 int s = 0, n = 75;
 while (s + n < 150) {
  s = s + 15;
  n = n - 5;
 }
 cout << n << endl;
 return 0;
}