Чтобы выделить непоследовательные фрагменты текста с помощью мыши, необходимо:
Выделить первый фрагмент текста.
Нажать и удерживать Ctrl и выделить с помощью мыши следующий фрагмент текста.
Повторить необходимое количество раз.
Теперь можно работать с выделенным текстом (копировать, удалять, изменять стиль и т. п.).
Var
x: real;
begin
readln(x);
if (x <= 0) then
x := 0;
writeln('y = ', x);
end.
------
Или так:
var
x: real;
begin
readln(x);
writeln('y = ', x > 0 ? x : 0);
end.
Ну, если варианты ответа записаны правильно, тогда правильный ответ С)
Так как 17264 ну никак не может быть в семеричной и <span>AH814 явно не шестнадцатиричная. А эти варианты есть только в С) так что ответ С)</span>
1) А:174; Б: понятия не имею
2) 6450 или 1100100110010
3) 3 бита
A)
Read(a,b,c)
b)
if (x mod 2 = 0)or(y mod 2 = 0) then c:=(x+y)/2
else c:= x mod y;
c)
S:=0;
For k:= 1 to 15 do
S:=S+k;
d)
While x<=100 do
x:=x*2;
e)
c:=a;
a:=b;
b:=c;