Переводим в 10-тичную с.с.
3*8^1+3*8^0=3*8+3*1=24+3=27(10)
2*4^1+1*4^0=2*4+1*1=8+1=9(10)
Не верно
var
a, b, c: real;
begin
writeln('Введите 3 любых числа');
readln(a, b, c);
if (a < b) and (a < c) then writeln(a, ' - наименьшее число');
if (b < a) and (b < c) then writeln(b, ' - наименьшее число');
if (c < a) and (c < b) then writeln(c, ' - наименьшее число');
if (a > b) and (a > c) then writeln(a, ' - наибольшее число');
if (b > a) and (b > c) then writeln(b, ' - наибольшее число');
if (c > a) and (c > b) then writeln(c, ' - наибольшее число');
readln; //Убрать если среда разработки не Turbo Pascal
end.
Var
x, y, r: real;
begin
read(x, y, r);
if ((x >= 0) and (y >= 0) and (x * x + y * y <= r * r))
or ((x < 0) and (y < 0) and (x + y >= -r)) then
write('да')
else
write('нет');
end.
#include<iostream>
using namespace std;
int main(){
int n, a, b, c;
cin>>n;
a = n / 100;
b = n /10 % 10 ;/* осторожно, у разных компиляторов разный порядок действий, если не робит, тогда вот так b = n/10; b = b %10 */
c = n % 10;
if (a%2 != 0) && (b%2 != 0) && (c%2! = 0) cout<<0<<endl;
else cout<<1<<endl;
return 0;
}
Program dfghf;
begin
writeln('Здравствуйте я выучила правило');
end.