с решением. Вообще не шарю в информатике.
Вместо *** вам необходимо восстановить HTML – код.
HTML // определяет тип документа как web страницу
HEAD // определяет начало и конец заголовка документа
TITLE … TITLE // определяет имя всего документа (название вкладки)
BODY background="…" // BODY указывает начало и конец тела HTML-документа, все HTML-элементы, отвечающие за отображение документа, управление им и гипертекстовые ссылки содержатся внутри данного тега; background задает цвет фона страницы.
h1 …="center" Иванов Иван Иванович h1 // расположение ФИО на сайте по центу, цвет текста – красный, h1 - тег заголовка, который создает самый крупный заголовок, цифра 1 может меняться в пределах от 1 до 6. Шесть будет самый мелкий заголовок.
hr // вставляет в текст горизонтальную разделительную линию
… src="…" align="right" // вставляет изображение на страницу, форматирует положение на странице
p align="center" // выравнивает текст по центру
A …="index1.htm" Моя биография A // создает гиперссылку на другую страницу сайта
…F="index2.htm" Хобби
…="index3.htm" Фотоальбом …
P align="left" // р используется для разметки параграфов, выравнивает текст по левому краю
//Поэтому интерпретировал как "любые 10 дней"
#include <iostream>
#include <stdlib.h>
#include <ctime>
using namespace std;
int main() {
srand(time(0));
int ar[30];
int max=0;
int ar2[21];
int is,iv;
cout<<"Mounth \n";
for(int i=0;i<30;i++){
ar[i]=rand()%100+1;
cout<<ar[i]<<" ";
}
for(int i=0;i<21;i++){ ar2[i]=ar[i]+ar[i+1]+ar[i+2]+ar[i+3]+ar[i+4]+ar[i+5]+ar[i+6]+ar[i+7]+ar[i+8]+ar[i+9]; //не влезло
if(max<ar2[i]){
max=ar2[i];
is=i+1;
iv=i+10;
}
}
cout<<"\n"<<is<<"-"<<iv;
cin.get();
cin.get();
return 0;
}
var
n:integer;
i,d:byte;
b:array[0..9] of boolean;
fail:boolean;
begin
Write('Введите четырехзначное натуральное число: ');
Read(n);
for i:=0 to 9 do b[i]:=False;
while (n>0) and (not fail) do begin
d:=n mod 10;
if b[d] then fail:=True else b[d]:=True;
n:=n div 10
end;
if fail then Writeln('В числе есть одинаковые цифры')
else Writeln('В числе нет одинаковых цифр')
end.
Тестовое решение:
Введите четырехзначное натуральное число: 1263
В числе нет одинаковых цифр
Введите четырехзначное натуральное число: 1315
В числе есть одинаковые цифры