Shkolnik228007
10.12.2020 14:02

Составить программу, которая создает и заполняет массив из 12 целых чисел случайными двузначными числами. вывести массив на экран. если последняя цифра значения элемента массива не равна 0, то поменять порядок цифр данного элемента. для изменения порядка цифр двузначного целого числа на обратный (исходное число 25, результат 52) использовать функцию пользователя.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Альмира2007
08.10.2020 06:08
PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
Внимание! Если программа не работает, обновите версию!

function DI(n:integer):integer;
begin
  var d:=n mod 10;
  if d=0 then result:=n
  else result:=10*d+n div 10
end;

begin
  var a:=ArrRandom(12,10,99); a.Println;
  a.Transform(t->DI(t)); a.Println
end.

Пример
24 90 73 90 78 53 70 14 46 37 45 45
42 90 37 90 87 35 70 41 64 73 54 54
0,0(0 оценок)
Ответ:
stanislavvolk8
08.10.2020 06:08
На скриншотах
==============
Составить программу, которая создает и заполняет массив из 12 целых чисел случайными двузначными чис
Составить программу, которая создает и заполняет массив из 12 целых чисел случайными двузначными чис
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота