1. Выведется:
x=4 y=20
x=16 y=420
2. Выведется:
a=1.2 b=2 a1=2 b1=1
a=1.2 b=2 a1=2 b1=1
a=1.2 b=2 a1=2 b1=1
+ скрин.
100x+10y+3-исходное число
300+10x+y-новое число, тогда:
300+10x+y=300x+30y+9+1, так как 9+1=10, то
y=0
300+10x=300x+10->290x=290->x=1
Исходное число:103
Проверка:
310=103*3+1-> 310=310
вот так
Основание десятеричной - десять, двоичной - два, восьмеричной - восемь, шестнадцатеричной - шестнадцать.
var a: integer;
begin
Randomize;
a := 100 + Random(900);
Writeln(a);
while (a > 0) and (a mod 2 = 0) do a := a div 10;
if a = 0 then
Write('да')
else
Write('нет')
end.
Var
a:array[1..?сколько у тебя элементов в массиве?] of integer;
b,c,i:integer;
begin
read(b,c);
for i:=1 to /kol-vo elementov v massive/ do
begin
read(a[i]);
write(a[i],' ');
end;
writeln
for i:=1 to /kol-vo elementov v massive/ do
begin
if i mod 2=0 then
a[i]:=a[i]+b
else
a[i]:=a[i]-c;
write(a[i],' ')
end;
end.