<span>Строка №6 - числу нельзя присвоить какое нибудь значение.
Строки №8 и №10 - целочисленным нельзя присвоить дробное значение.
Строка №7 - между 7 и 8 должна стоять точка, а не запятая.
Вот изменённая программа:
program qq;
var a, b, x, y: real;
begin
a := 5;
x := 10;
y := 7.8;
b := 2.5;
x := 2*(a + y);
a := b + x;
end.</span>
О - один
д - два
т - три
ч - четыре
п - пять
логично предположить, что дальше
ш - шесть
с - семь
в - восемь и т.д.
1)50 а второе 166.Объясняю как получила:1)переводим из 2 в десятичную 00110010(2)=0*2(7)+0*2(6)+1*2(5)+1*2(4)+0*2(3)+0*2(2)+1*2(1)+0*2(0)=0+0+32+16+0+0+2+0=50(10)
2)Переводим из 2 в 10:10100110(2)=1*2(7)+0*2(6)+1*2(5)+0*2(4)+0*2(3)+1*2(2)+1*2(1)+0*2(0)=128+0+32+0+0+4+2+0=166(10), ну по крайне мере нас так учили!) ты получаешь это все в битах а потом просто переводишь в байты,в 1 байте=8 бит!)Желаю удачи!!)
Если в Паскале, и первый пример всё же 1x2, то такая программа:
var
a,b: integer;
begin
a := 1;
b := 2;
while a<=9 do
begin
writeln(a,'x',b,'=',a*b);
a := a + 1;
end;
end.