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

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

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

4 года назад

10

Помогите!!!!!.

....................

Информатика

1 ответ:

childebaev4 года назад

0 0

3...4...6 верные утверждениия

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

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

шаффкат [60]

1)-622
2)-26Е
3)-11001101
4)-110100100
5)-212.8125

0 0

3 года назад

Написать программу нахождения в вещественном массиве из 10 элементов, количества отрицательных и превышающих -30.

Favorit40 [2.2K]

//Pascal

var
a: array[1..10] of real;
i, count: integer;

begin
count := 0;

write('Исходный массив: ');

for i := 1 to 10 do
begin

    {Генерация}
    a[i] := random(200) + Random() - 100;

    {Вывод}
    write(a[i] : 0 : 5, ' ');

    {Проверка}
    if (a[i] > -30) and (a[i] < 0) then inc(count);

end;

writeln;
writeln('Количество отрицательных элементов, превышающих -30: ', count);
end.

0 0

4 года назад

Скорость передачи данных через ADSL- соединение (англ. Asymmetric Digital Subscriber Line — асимметричная цифровая абонентская л

andpetric

256000*2/8/1024=62,5

0 0

1 год назад

Paskal найти среднюю линию трапеции m=a+b/2

kolya9100

Var a,b,m :real;beginreadln(a);readln(b);m:=(a+b)/2;writeln(m);end.

0 0

4 года назад

Что это такое? Расскажите информацию про это пожалуйста! Даю 20 баллов.

Евгения Ливински

я думаю это жесткий диск

0 0

4 года назад

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