Program gt;
label 1;
var a:array[1..30]of integer;
i,min:integer;
begin
randomize;
min:=200;
1:
for i:=1 to 30 do
begin
a[i]:=random(101);
if(a[i]<min)and(a[i]>=20)then min:=a[i];
end;
if(min<>200)then begin
for i:=1 to 30 do
write(a[i],' ');
writeln;
writeln(min);
exit;
end;
if(min=200)then goto 1;
end.
1. Используя шифр Цезаря, декодировать следующие фразы:
a. ЛМБТТОЬК ШБТ
КЛАССНЫЙ ЧАС (сдвиг -1)
b. ВЁМПЁ ТПМОЧЁ РФТУЬОЙ
БЕЛОЕ СОЛНЦЕ ПУСТЫНИ (сдвиг -1)
c. РЦЙРГ ТСПСЪЮ
НУЖНА ПОМОЧЫ (сдвиг -3, или описка или ошибка или так и задумывалось)
2. При использовании шифра перестановки кодирование осуществляется перестановкой букв по одному и тому же правилу. Восстановите слова и определите правила перестановки:
обмен букв 1 и 3, 4 и 6, 7 и 8 если есть
a. НИМАРЕЛ
Минерал
b. ЛЕТОФЕН
Телефон
c. НИЛКЙЕА
Линейка
d. НОМОТИР
Монитор
e. РАКДНАША
Карандаш
3. Используя шифр перестановки из предыдущего задания, закодируйте слова: ГОРИЗОНТ, ТЕЛЕВИЗОР, МАГНИТОФОН
Ригозитн
Летиверзо
Гамтинфоон
Дополнительная задача (5 баллов)
Даны фразы на языке ниуэ (древний полинезийский язык) и их переводы на русский язык:
1. Kua kitia e koe a Pule. - Ты видишь Пуле.
2. Tо lеlе е mаnu. - Птица полетит.
3. Kua kоukоu a kоe. - Ты купаешься.
4. Kua fanо a ia. - Он идет.
5. Ne kitia he tama a Siоne. - Мальчик видел Джона.
6. Kua fano e tama. - Мальчик идет.
7. To kitia e Sione a ia. - Джон увидит его.
8. Ne liti e ia e kulї. - Он бросил собаку.
9. Kua kai ne kulї e mаnu. - Собака ест птицу.
Задание. Переведите на язык ниуэ: (правильность не гарантирую, тем более с артиклями)
1. Мальчик пойдет.
To fano e tama
2. Ты съешь собаку.
To kai a koe e kulї
3. Джон купался.
Ne kоukоu e Sione
#include<iostream>
using namespace std;
int main()
{
double d;
cin>>d;
cout<<"\nS="<<2*3.14*(d/4); // если нужна площадь , то заменить на cout<<"\nS="<<3.14*(d/4)*(d/4);
}
Это событие нажатия на кнопку, которая находится на Form1.