решить задание
программирование С++
на visual studio
Описание
Операторы повторения. Циклические алгоритмы
Объявить массив целых чисел из 1000 элементов.
Заполнить случайными числами в диапазоне от 0 до 100.
Выяснить, есть ли в массиве одинаковые элементы.
Вывести их значения и индексы.
Отчет должен содержать:
1.Описание оператора повторения for.
2.Описание объявления массива.
3.Полный текст программы для выполнения в среде MS Visual Studio 2012
Она на Pascal.
var a,last_num,first_num:integer;
begin
Write('Введите число');
read(a);
last_num:=a mod 10;
first_num:=a;
while first_num>10 do
begin
first_num:= first_num div 10;
end;
writeln('Последняя цифра ', last_num, ', Первая цифра ', first_num);
if first_num > last_num then
writeln('Первая цифра больше')
else if first_num = last_num then
writeln('Они равны')
else if last_num > first_num then
writeln('Последняя цифра больше');
end.