9 вопрос пожалуйста очень срочно

Знания

Информатика

2 ответа:

evgrafvys [1]4 года назад

0 0

В 9 номере будет ответ 1.1 схема алгоритма

юлич [28]4 года назад

0 0

Номер восемь ответ а, номер девять ответ "а" у тебя ведь три условия налево направо и прямо типа идти, 10 вопрос ответ 3, 11 вопрос ответ 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 ответа

Что такое кодирование числовой информации? Мне нужно определение.

vladkats

<span>Кодированием числовой информации:называется совокупность приемов наименования и записи чисел.</span>

0 0

1 год назад

Определить объём видеопамяти в байтах, требуемый для хранения изображения на экране монитора, который может отображать N точек п

pusshkin

I= x*y * i
N=2^i
256=2^i
i=8 бит
I= 1280*768*8 =7864320 бит =983040 байт

0 0

4 года назад

Написать программу подсчитивающую количество цифр целого неотрицательного числа

Неролия [14]

Var a,k:integer;
begin
write('a (>0) = ');
readln(a);
k:=0;
while a>0 do
begin
k:=k+1;
a:=a div 10;
end;
writeln('k = ',k);
end.

Пример:
<span>a (>0) = 180653
k = 6</span>

0 0

4 года назад

Найти среднее арифметическое всех целых чисел от 100 до 1000

GoodJob [28]

Program Task;
Var a, b, i: Integer;
Begin
For i := 100 To 1000 Do
Begin
a := a + i;
b := b + 1;
End;
WriteLn('Результат: ', (a / b):4:2);
ReadLn;
End.

0 0

4 года назад