Определите что будет напечатанно в результате выполнения следущего алгоритма, записанного на Паскале :Var s:integer; k:real ;BeginS:=377 ;If s mod 10 =7 thenBeginS :=s+3;K :=s/10EndElse k:=1;Writeln(k)End.
На выходе получим число 38.7, так как условие s mod 10 = 7 выполняется для числа 377 (последняя цифра 7), поэтому будет выполнено присваивание S := s + 3 = 377 + 3 = 380 и K := s / 10 = 380 / 10 = 38.0.
На выходе получим число 38.7, так как условие s mod 10 = 7 выполняется для числа 377 (последняя цифра 7), поэтому будет выполнено присваивание S := s + 3 = 377 + 3 = 380 и K := s / 10 = 380 / 10 = 38.0.