Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
(1010,01)16=1*16^3+0*16^2+1*16+0+0*16^(-1)+1*16^(-2)=4112,00390625
(f001)16= 15*16^3+1=61441
var a: array [1..10] of integer;
i,k: integer;
begin
read(a);
k: =1;
for i : = 1 to 10 do
if a[k]> a[i] then k: =i;
end;
if k mod 2 = 0 then writeln(k," - chetnoe")
else writeln(k," - ne chetnoe");
end.
program chislo;
var x: integer;
z,y : real;
readln(x);
y: =5.5;
z: = x-y;
writeln(z);
при запуске программы вводите эти значения и тестируете.
var v1,v2,t,t1: real;
read(v1,v2,t,t1);
writeln(v1*(t+t1)< =v2*t1);
Популярные вопросы