Составьте программу, которая все числа кратные 10 делит на 10 а остальные умножает на 10. ввод элементов массива либо с клавиатуры, либо случайным образом. количество элементов массива задайте самостоятельно. побыстрее
297
467
Ответы на вопрос:
const n=10;
var i: integer;
a: array[1..n] of integer;
begin
for i: =1 to n do
begin
a[i]: =random(100);
write(a[i]: 3,' ');
if a[i] mod 10 = 0 then a[i]: =a[i] div 10
else a[i]: =a[i]*10
end;
writeln;
for i: =1 to n do write(a[i]: 3,' ')
end.
Популярно: Информатика
-
bd71107.01.2022 11:08
-
кошка44825.05.2022 03:25
-
anyyy00109.12.2020 10:48
-
077315.02.2023 18:19
-
ника209208.06.2021 15:21
-
kartil09.02.2022 13:28
-
GiraAronEchwik05.11.2021 14:23
-
FCRuslanZENIT123.06.2020 03:49
-
violetta23827.06.2023 05:54
-
Darhanfan31.12.2022 20:12