Составьте алгоритм возведения четного числа в квадрат, а нечетного-в куб.
Только нужно в сокращенной форме ветвления, по типу этой:
211
385
Ответы на вопрос:
Объяснение:
начало
вывод("введите число")
ввод(х)
если х%2=0
то вывод(х*х)
иначе
вывод(х*х*х)
конец
Const n = 5; m = 5; var a: array[1..n,1..m] of integer; i,j,s: integer; begin //для теста заполним массив сл.числами for i: =1 to n do begin for j: =1 to m do begin a[i,j]: =random(21)-10; write(a[i,j]: 4); end; writeln; writeln; end; //сумма всех элементов массива for i: =1 to n do for j: =1 to m do s: =s+a[i,j]; writeln('сумма всех элементов массива: ',s); //сумма каждой строки for i: =1 to n do begin s: =0; for j: =1 to m do begin s: =s+a[i,j]; end; writeln ('строка: ',i,' сумма: ',s); end; end.
Популярно: Информатика
-
Diko05612.05.2023 05:49
-
VeronikaBruhova20.11.2021 11:26
-
SergeyS903.10.2020 02:35
-
SashaKo942023.10.2021 09:30
-
karakatitsa120.01.2022 21:03
-
Нюра95918.09.2021 17:44
-
19835613.11.2022 09:53
-
Kurbanovaarina18.05.2020 16:27
-
skillvirex28.10.2021 04:02
-
НАСТЯ753923.08.2022 10:30