Задать вопрос!

Задать вопрос!

Все категории

3 года назад

5

Представить число в римской системе счисления: 2384

Информатика

1 ответ:

nifertiti30043 года назад

0 0

<span>MMCCCLXXXIV
</span><span>MMCCCLXXXIV</span>

Читайте также

ПОМОГИТЕ! Спасибо заранее!

Дамира123

А в какую СС перевести то надо?

0 0

4 года назад

Помогите, срочно, плз

Evgeniy V

3+2×8+0×64+2×512=3+16+1024=1043

0 0

4 года назад

Программа на языке Паскаль

Игорь Владимирови...

const n=10;

var a:array[1..n] of integer;

i: integer; p: longint;

begin

writeln('Введите элементы массива:');

for i:=1 to n do read(a[i]);

p:=1;

for i:=1 to n do p:=p*a[i];

writeln('p = ',p);

end.

Пример:

Введите элементы массива:

2 -3 4 1 8 -1 5 -7 -2 3

p = 40320

0 0

4 года назад

Мешок B - это мешок всех целых двузначных чисел: от 10 до 99. Нарисуй два таких мешка A и Б, в каждом из которых есть непустая ц

Андрей Ддд [31]

Множества А - это двузначные числа кратные 11, а множество В - числа кратные 3, значит пересечение множеств А и В - множество двузначных чисел кратных 11 и 3, то есть множество содержит числа 33,66,99.

0 0

4 года назад

Составить программу проверки знания таблицы умножения. Сценарий: компьютер спрашивает: «Проверим?» (варианты ответов: 0 – «нет»,

kosa1

// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018

var c, w: integer;

procedure check;

begin

var (a, b) := (Random(0, 20), Random(0, 20));

Print($'{a}*{b}=');

if a * b = ReadInteger then begin inc(c); Println('Правильно') end

else begin inc(w); Println('Неправильно') end;

end;

procedure res;

begin

Println($'Задано вопросов {c+w}');

Println($'Правильных {c}({(c*100)/(c+w):f1}%)');

Println($'Неправильных {w}({(w*100)/(c+w):f1}%)');

end;

begin

var start := true;

while start do

begin

Println('Проверим?(0/1)');

if ReadInteger = 0 then

begin start := false; res; end

else check;

end;

end.

Пример в приложении.

0 0

4 года назад

Прочитать ещё 2 ответа