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

4 года назад

Вывести все двухзначные числа с чётной суммой цифр. (Программа на Paskal)

Знания

Информатика

1 ответ:

Елена Самойлова [21]4 года назад

0 0

Ответ:

program SumNum;

var

i: Integer;

begin

for i := 10 to 99 do begin

if (i div 10 + i mod 10) mod 2 = 0 then

Write (i, ' ');

end;

ReadLn;

end.

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

Информатика. Записать данные выражения в инфиксной форме и в форме дерева. (хотя бы с инфиксной помогите, пропустил урок и ничег

Алексей Поляков [7]

Ответ:

(15 + 3) × (5 + 2 - 1) - 4

(7 + 2) × 3 - 4 × (5 - 1)

c -d + a - b

Это инфиксная, т.е. самая обычная запись.

И во вложении дерево для первого примера. Остальные строятся аналогично (см. дерево и исходную запись - там все просто)

0 0

4 года назад

Помогите с информатикой: Сколько значащих единиц в двоичной записи числа 2^85-8^25+4^6+8?

Бюбон [50]

1) 2^85=100...0 (2cc) (1 и 85 нулей)

8^25=(2^3)^25=2^75 =100..0 (2cc) (1 и 75 нулей)

4^6=2^12=100...0 (2cc) (1 и 12 нулей)

8=2^3=1000 (2cc) (1 и 3 нуля)

2) 2^12 +2^3= 1000000000000+1000=1 0000 0000 1000 (2cc) (две единицы)

3) 2^85-2^75= 11 1111 11110000...0 (десять единиц и 75 нулей)

4) 10 единиц+2 единицы=12 единиц

ответ 12

0 0

3 года назад

Решите, пожалуйста, в паскале. 1) Одномерный массив из 10 элементов задан датчиком случайных чисел на интервале от -1 до 6. Найт

Николай906 [7]

1 задача
var a, b, s, i, k:integer;
z:array[1..10] of integer;
begin
s:=1;
For i:=1 to 10 do
begin
z[i]:=random(16)-10;
if z[i]<0 then
begin
k:=sqr(z[i]);
s:=s*k;
end;
end;
For i:=1 to 10 do
begin
write (z[i], ' ');
end;
writeln ();
writeln ('Произведение квадратов равно ', s);
<span>end.</span>

0 0

4 года назад

В цикле с предусловием тело цикла: А) Может не выполнятся ни разу Б) Выполняется в любом случае Г) Выполняется только тогда, ког

Eka7 [621]

Ответ Г - выполняется только тогда, когда результатом выполнения команды проверки условия является истина.

0 0

3 года назад

Файл имеет объем 150 kb. Сколько раз его можно записать на диск объемом 1,44 mb?

neklyudov59

Ответ:

9,6 или 9

Объяснение:

150кб это 0,15

от сюда 1,44:0,15=9,6

0 0

4 года назад