Регистрация
elitael
11.11.2022 08:04
Информатика
Есть ответ 👍

Возвести в куб нечётные числа от 1 до 20 (в паскале)

282
437
Посмотреть ответы 2

Ответы на вопрос:

romalebedev19
romalebedev19
4,7(62 оценок)
Var a: array[0..19] of integer; i: integer; begin for i: =0 to 19 do begin a[i] : = i + 1; write(a[i], ' '); end; writeln(); for i: =0 to 19 do begin if i mod 2 = 0 then a[i] : = a[i]*a[i]*a[i]; write(a[i], ' '); end; end.
Masha8271
Masha8271
4,6(3 оценок)
1)   1111 +1011 11010 2)   1001 +   110   1111 3)   1100 -0111     101 4)   0101       = 1101 -1101             -101                         1000           ответ: -1000 5) 10111 -   111 10000

Популярно: Информатика