<span> Если число оканчивается цифрой 0, то оно делится на 5. Известно, что данное число не делится на 5. Следовательно это число оканчивается на любое число,которое не оканчивается на 5 и 0</span>
350*200=70000 пикселей
65 Кбайт = 65000 байт * 8 = 520000 бит
520000/70000=7
2^7=128 цветов
можна отримувати гарны оцынки, здобувапти знання!
Var s: string;
i:integer;
begin
write('Введите текст: ');
readln (s);
for i:=1 to length(s) do
if s[i]='к' then write (i,' ');
<span>end.</span>
Program p1;
const N=10;
var i,max,sum:integer;
a:array[1..10] of integer;
begin
randomize;
max:=0;
sum:=0;
for i:=1 to N do a[i]:=1+random(10);
for i:=1 to N do write(a[i],' ');
for i:=1 to N do
if (a[i]>max) then max:=a[i];
writeln;
writeln('Максимальное число: ',max);
for i:=1 to N do
if(a[i]=max) then sum:=sum+1;
write('Количество максимальных чисел: ',sum);
end.