М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Jeka5A
Jeka5A
13.12.2021 20:34 •  Информатика

Как превратить слово рота в полк за 4 действия

👇
Ответ:
Рота - роза - поза - пола - полк.
4,8(84 оценок)
Открыть все ответы
Ответ:
aidaXdXd
aidaXdXd
13.12.2021

Без задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

Без заданияБез задания

4,6(60 оценок)
Ответ:
камидь
камидь
13.12.2021
1. Вот так это можно написать коротко, быстро и понятно, если разбираться в современном Паскале.

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

function SoD(Self:integer):integer; extensionmethod;
begin
  while Self>0 do (Result,Self):=(Result+Self mod 10,Self div 10);
end;

function Diff(Self:array of integer):integer; extensionmethod;
begin
  Result:=Self.Max.SoD-Self.Min.SoD
end;

begin
  Writeln(ReadArrInteger('Три пятизначных числа:',3).Diff)
end.

Пример
Три пятизначных числа: 12345 23456 34567
10

2. А вот так примерно учат у нас в школах...

program School;
var
  i,n,max,min,d:integer;
begin
  Write('Введите 1-е пятизначное число: '); Read(n);
  max:=n;
  min:=n;
  for i:=2 to 3 do begin
    Write('Введите ',i,'-е пятизначное число: '); Read(n);
    if n<min then min:=n
    else
      if n>max then max:=n;
    end;
  d:=0;
  while max>0 do begin
    d:=d+max mod 10;
    max:=max div 10
    end;
  while min>0 do begin
    d:=d-min mod 10;
    min:=min div 10
    end;
  Writeln(d)
end.

Пример
Введите 1-е пятизначное число: 12345
Введите 2-е пятизначное число: 23456
Введите 3-е пятизначное число: 34567
10
4,4(39 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ