Чтобы программировать и создавать программы
56 (в 16с/с) = 0101 0110 (в 2с/с) = 010 010 110 (в 2с/с) = 226 (в 8с/с)
Var c:real;
Begin
WriteLn('z = 9/(2c-1)');
Write('c = ');ReadLn(c);
if 2*c-1=0 then WriteLn('Ошибка: На ноль делить нельзя!')
else WriteLn('z = ',9/(2*c-1))
End.
var
x, sum:integer;
Begin
Write('Введите число '); Readln(x);
while (x > 0) do begin
sum:= sum + x mod 10;
x:=x div 10
end;
if (sum mod 2 = 0)then
Writeln('YES')
else
Writeln('NO');
end.
1) <span>Люди используют компьютер, чтобы хранить данные
2) </span>Люди используют телефон, чтобы <span>передавать информацию
3) </span><span>Когда мы укололись о шипы кактуса ,то получили тактильную информацию (потому что тактильная информация — это ощущения).</span>