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

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

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

4 года назад

6

Помогите срочно нужно сделать!! 3А16=

Информатика

1 ответ:

Pavel12345 [7]4 года назад

0 0

Что такое буква А,если 0 то равно 3016

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

Помогите пожалуйста Составить программу для последовательного произведения вводимых с клавиатуры целых чисел ,предусмотреть выхо

Дмитрий569

Нет под рукой щас паскаля, вот примерный цикл
readln(Input); res := Input; while (not(Input = 0)) do begin readln(Input); res := res * Input; end;

0 0

4 года назад

Переведите числа из десятичной системы счисления в двоичную61 87

Alevtina2016 [51]

61 это 110110 110001
87 это 111000 110111

А чтобы не было проблем -
Вот ссылка: https://decodeit.ru/binary/

0 0

1 год назад

Вводятся произвольные натуральные числа в количестве n . Вывести ('Да') если все числа являются четырехзначным и при этом начина

Marishikko [17]

Var a, b, c :integer; g :string;
begin
g:=('Нет');
readln(b);
for a:=1 to b do
begin
readln(c);
if (c>999) and (c mod 2<>0) and (c<10000) then
g:=('Да');
end;
writeln(g);
end.

0 0

4 года назад

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

Помогите пожалуйста найти русско-марийский переводчик онлайн

Netovich79 [74]

В интернете набери должо быть

0 0

4 года назад

Найти средне арифметическое элементов последовательности, превосходящих некоторое число С. Массив задан датчиком случайных чисел

Анна Иванова82 [782]

var

a:array [1..20] of integer;

i,c,k:integer;

sr:real;

begin

randomize;

for i:=1 to 20 do begin

a[i]:=random(80)-44;

write (a[i],' ');

end;

writeln;

write ('C = ');readln(c);

for i:=1 to 20 do

if a[i]>c then begin

sr:=sr+a[i];

k:=k+1;

end;

sr:=sr/k;

writeln (sr:0:2);

readln;

end.

0 0

4 года назад