М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
вова953
вова953
20.12.2022 04:06 •  Информатика

Переведите из десятичных чисел в двоичный код числа: 256; 512; 1024

👇
Ответ:
IbraevaLisa
IbraevaLisa
20.12.2022
256-100000000
512-1000000000
1024-10000000000
4,6(32 оценок)
Открыть все ответы
Ответ:
esken576
esken576
20.12.2022
Вот: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 const   n=5; var   a: array[1..n,1..n] of integer;   i,j,s: integer; begin   s: =0;   randomize;   for i: =1 to n do     begin       for j: =1 to n do         begin           a[i,j]: =random(10);           write(a[i,j]: 4);           if (i+j) mod 3=0 then             s: =s+a[i,j];         end;       writeln;     end;   writeln('s=',s); end.
4,8(43 оценок)
Ответ:
dieric
dieric
20.12.2022

4.

program p3;

uses Robot;

procedure Square2;

begin

right;

paint;

down;

paint;

left;

paint;

up;

paint

end;

var i,j:integer;

begin

Task('p3');

for i := 1 to 6 do

begin

Square2;

if i<=5 then

begin

for j := 1 to 2 do left;

for j := 1 to 2 do up      

end

end

end.

5.

program p4;

uses Robot;

procedure Square2;

begin

paint;

right;

paint;

down;

paint;

left;

paint;

up

end;

var i:integer;

begin

Task('p4');

Square2;

for i:= 1 to 2 do right;

Square2;

for i:= 1 to 2 do down;    

Square2;

for i:= 1 to 2 do left;    

Square2;

for i:= 1 to 2 do up

end.

Объяснение:

Второй вариант 5-го задания с двумя процедурами

program p4;

uses Robot;

procedure Square2;

begin

paint;

right;

paint;

down;

paint;

left;

paint;

up

end;

procedure Square;

var i:integer;

begin

Square2;

for i:= 1 to 2 do right;

Square2;

for i:= 1 to 2 do down;    

Square2;

for i:= 1 to 2 do left;    

Square2;

for i:= 1 to 2 do up

end;

begin

Task('p4');

Square

end.

4,7(74 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ