<span>форматы представления чисел используются в ЭВМ - а, в</span>
Короче, берешь число в восьмеричной системе счисления, например, - 125
потом пишешь над каждым разрядом цифры справа на лево, потом выносишь число из разряда и умножаешь на 8 в степени номера этого числа
Ответ:
51
Объяснение:
1) НЕ ((x > 50) или НЕ (х чётное))
2) НЕ (x > 50 или х нечётное)
3) x 50 и х чётное
4) Ищем число, которое больше 50 и нечетное
beginvar x1, x2, x3, x4, y1, y2, y3, y4: double; writeln('Введите x1'); readln(x1); writeln('Введите x2'); readln(x2); writeln('Введите x3'); readln(x3); writeln('Введите x4'); readln(x4); writeln('Введите y1'); readln(y1); writeln('Введите y2'); readln(y2); writeln('Введите y3'); readln(y3); writeln('Введите y4'); readln(y4);if((y1-y4=y2-y3) AND (x2-x1=x3-x4)) thenwriteln('ABCD - параллелограмм')else writeln('ABCD - не параллелограмм');end.
//Pascal ABC.NET v3.0 сборка 1111
Var
a:integer;
begin
writeln('Our burgers do not prepare you for the exam, but will learn to code');
writeln('Value of burgers:');
readln(a);
case a of
1:writeln('Mineral water');
2:writeln('Coca-cola bottle');
end;
if a>=3 then writeln('One more burger');
end.<span>
Пример ввода:
10
Пример вывода:
One more burger
</span>