Определите, что будет напечатанно в результате выполнения следущего алгоритма, записанного на Паскале:
Var s:integer; k:real;
Begin
S:=377;
If s mod 10=7 then
Begin
S:=s+3;
K:=s/10
End
Else k:=1;
Writeln (k)
End