Из 10 цифр на 4 позициях можно получить 10^4 = 10 000 комбинаций
При добавлении одной буквы количество номеров = 5*10000 = 50 000
При добавлении 2 букв = 5^2*10000 = 250 000
При добавлении 3 букв = 5^3*10000 = 1 250 000
Ответ: наименьшее количество букв = 3
Чтобы принтер мог пропечатать всё. Если бы отступа не было, часть текста была бы не видна или принтер весь был бы в чернилах.
// PascalABC.NET 3.0, сборка 1076
type
Point=record
x,y:real
end;
Line=record
A,B:Point
end;
Triangle=record
A,B,C:Point;
sa,sb,sc:real; { длины сторон }
end;
procedure GetPoint(PointName:char; var M:Point);
begin
Write('Введите координаты точки ',PointName,'(x,y): ');
Read(M.x,M.y)
end;
function LineLength(A,B:Point):real;
begin
LineLength:=sqrt(sqr(B.x-A.x)+sqr(B.y-A.y))
end;
procedure CreateTriangle(var T:Triangle; var l:boolean);
begin
With T do begin
GetPoint('A',A);
GetPoint('B',B);
GetPoint('C',C);
sa:=LineLength(B,C);
sb:=LineLength(A,C);
sc:=LineLength(A,B);
l:=(sa+sb>sc) and (sa+sc>sb) and (sb+sc>sa)
end
end;
function TriangleIsLikes(T1,T2:Triangle):boolean;
var
k1,k2,k3:real;
begin
k1:=T1.sa/T2.sa; k2:=T1.sb/T2.sb;
if k1=k2 then begin
k3:=T1.sc/T2.sc;
TriangleIsLikes:=k1=k3
end
else
TriangleIsLikes:=False
end;
var
T1,T2:Triangle;
legal:boolean;
begin
Writeln('*** Первый треугольник ***');
CreateTriangle(T1,legal);
if legal then begin
Writeln('*** Второй треугольник ***');
CreateTriangle(T2,legal);
if legal then
if TriangleIsLikes(T1,T2) then Writeln('Треугольники подобны')
else Writeln('Треугольники не подобны')
else Writeln('Треугольник невозможно построить')
end
else Writeln('Треугольник невозможно построить')
end.
<u>PascalABC.NET 3.3.5, сборка 1648 от 31.03.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
ReadSeqInteger(ReadlnInteger).Where(t->t.IsEven).Max.Println
end.
<u>Пример</u>
6
20 31 -18 0 14 7
20
Ответ:
1)
#include <iostream>
using namespace std;
int main() {
int n,m;
int sum=0;
cout << "Enter number n: ";
cin >> n;
cout << "Enter number m: ";
cin >> m;
for (int i = n; i <= m; i++) {
if (i % 3 == 0) cout << i<<endl;
}
}
===================
2)
#include <iostream>
using namespace std;
int main() {
int n, m;
int sum = 0;
cout << "Enter number n: ";
cin >> n;
cout << "Enter number m: ";
cin >> m;
for (int i = n; i <= m; i++) {
if (i % 2 != 0) sum+=i;
}
cout << "Result: " << sum << endl;
}
===================
3)
#include <iostream>
using namespace std;
int main() {
long n,m, max=0;
cout << "Enter number: ";
cin >> n;
m = n;
for (int i = 10; n>0;) {
if (n % i > max)
max = n % i;
n = n / i;
}
cout << "Result: " << max;
}
Объяснение:
