Решите пожалуйста,даю 98 баллов!!!!!

0 голосов
26 просмотров

Решите пожалуйста,даю 98 баллов!!!!!


image

Информатика (67 баллов) | 26 просмотров
Дан 1 ответ
0 голосов
Номер 1. Переведем из двоичной в десятичную число 110000=1*2⁴+1*2⁵=16+32=48
78₁₀>48₁₀
Номер 2.
0 - нет остатка, 1 - есть остаток
824:2=412 (0) 
412:2=206 (0)
206:2=103 (0)
103:2=51 (1)
51:2=25 (1)
25:2= 12 (1)
12:2=6 (0)
6:2=3 (0)
3:2= 1 (1)
Запишем это число снизу вверх и добавим в начале 1 
1100111000₂ нужно перевести обратно
1*2³+1*2⁴+1*2⁵+1*2⁸+1*2⁹=8+16+32+256+512=824₁₀
Номер 3.
10110010₂ и 110000₂ переведем в 10-ую систему счисления
запишу кратко
2¹+2⁴+2⁵+2⁷=2+16+32+128=178₁₀
А число 110000 мы уже переводили в первом номере - 48
Выполним условия
1.Сложим 178 и 48=226
2.Вычтем 48 от 178=130
3.Умножим 178 на 48=8544
Номер 4.
Тут видимо нужно написать программу. Напишу ее на PascalABC
program chetnie_shisla;
var a,b,s:integer;
k:byte;
Begin
k:=0; s:=0;
writeln ('введите первое число'); read(a);
writeln ('введите второе число'); read(b);
s:=a+b;
if s mod 2=0 then k:=k+1;
writeln(s);
Номер 5.
program chisla;var a:integer;Begina:=6;while a<=38 do begin a:=a+4; write(' ',a); end;end.<strong>Номер 6.
program leto;
var c:integer;
writeln ('введите число от 6 до 8'); read(c);
if c=6 then writeln ('Июнь');
if c=7 then writeln ('Июль');
if c=8 then writeln ('Август');
end.
Номер 7.
Щас подумаю, в комменты напишу :)


(538 баллов)
0

спасибо,и пожалуйстааа,реши 7 ,плз

0

вот правильное решение номер 4
program chetnie_shisla;
var a,b,s:integer;
c:real;
k:byte;
Begin
k:=0; s:=0;
writeln ('введите первое число'); read(a);
writeln ('введите второе число'); read(b);
c:=a/b;
s:=a+b;
if s mod 2=0 then begin k:=a*b; writeln(k); end else write(c);
end.

0

щас 7й попробую сделать