Предмет: История, автор: qkprvsiu

Последствия битвы на реке Граник

Ответы

Автор ответа: usandronova

Ответ:

Александ победил. Победа в бою на реке Граник открыла македонцам прямой путь в долину Тигра и Евфрата - к центру персидской деспотии.После битвы при Гранике Александр двинулся к Сардам, которые сдались без боя

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Русский язык, автор: stasa611h

проверочное слово к дерево, корнями, земля, вода

1 год назад

Предмет: Английский язык, автор: miftakhova82

I am eleven and they are twelve- написать сокращеную форму

1 год назад

Предмет: Русский язык, автор: romaroma0105

скаска старик хоттабыч ибн по арабский и что для вольки стало

1 год назад

Предмет: Алгебра, автор: oa820408

Докажите неравенство a^2+10B^2>6AB

8 лет назад

Предмет: Информатика, автор: egor222777

Приветствую помогите с данной задачей.
Условие - Составьте программу которая учитывает все варианты, все цифры в четырехзначном числе,положении возрастания затем в порядке убывания и выводит в качестве результата сумму 3 чисел(Начальное число, число с цифрами по возрастанию, число с цифрами по убыванию).Цифры в числе не должны быть равны, если же они равны,то "WriteLn('Ошибка');"

Данные:
Входные 2576.
Выходные 12756.

Начало я уже написал, главная проблема с условиями.

Program Test;
Var a,a1,a2,a3,a4,b,c:integer;
Begin
ReadLn(a);
a1:=a div 1000;
a2:=a div 100 mod 10;
a3:=a div 10 mod 10;
a4:= a mod 10;
if (a1=a2) or (a2=a3) or (a2=a4) or (a1=a3) or (a1=a4) or (a3=a4) then WriteLn('Ошибка')
else ...

Буду благодарен всем представленным решениям и советам.
Спасибо

8 лет назад