Задание

Определите, cколько существует различных значений переменной s, при которых программа выведет число 78.

var s, n: integer;

begin

readln(s);

n := 10;

while s < 360 do begin

s := s + 16;

n := n + 4;

end;

writeln(n)

еnd.