Program Valerya;
uses CRT;
car a, b, c, d:integer;
begin
a := 3;
b := 2;
c := 5;
d := 7;
if a – b < 0
then if d < c
then if d < 0
then a := b
else
else a := d
else d := c;
writeln(d);
end.
это программа.
а значение d=5
<span>Язык Pascal, работа на массиве. с заполнением с клавиатуры. Ты заполняешь 9 элементов ( через enter ), а он тебе выводит тоже самое, только с противоположными знаками</span>
Var x: array[1..9] of integer;
Var i,h:integer;
Begin
for i:= 1 to 9 do
Begin;
Readln(h);
x[i] := -1*h;
end;
for i:=1 to 9 do
Begin;
Writeln('Элемент номер ',i,' массива: ',x[i]);
end;
readln(x);
end.
У зв'язку з розвитком науки і техніки, а також у зв'язку з появою попиту на ринку послуг в галузі телекомунікацій було вирішено ввести нову послугу, на базі новітньої технології IP-телефонії. IP-телефонія - це технологія передачі голосового трафіку по каналах мережі Internet, тобто по мережах з пакетною маршрутизацією (VoIP, Voice over IP). На відміну від IP-телефонії, традиційна телефонія - це передача голосу з виділенням окремого каналу для кожного з'єднання. Більш доступною мовою "IP-телефонія" - це передача телефонних з'єднань по IP, Інтернет-протоколу.
1) 1*2^6+1*2^5+0*2^4+0*2^3+1*2^2+1*2^1+0*2^0=64+32+0+0+4+2+0=102
2)012 = 0∙21+1∙20 = 0+1 = 110
