!!!!!
Что будет напечатано после выполнения программы?
var k, S: integer;
begin
k := 10;
S := 0;
while k < 120 do
begin
S := S + k;
k := k + 5
end;
write (s)
end.
Ниже дана программа. Получив на вход натуральное число x, программа печатает число R. Укажите число R, при вводе числа 70.
var x, d, R: longint;
begin
readln(x);
R := 0;
while x > 0 do
begin
d := x mod 10;
R := 10*R + d;
x := x div 10
end;
writeln(R)
end.