256 = 2^8 т.е. 8 бит на пиксель
128 = 2^7 -> 7 бит/пиксель
10*10 = 100 пикселей
100 * 7 = 700 бит
// PascalABC.NET 3.3
begin
// а)
writeln('Результаты сдачи экзамена:');
var a:=ArrRandom(15,2,5); a.Println; // генерируем и выводим массив оценок
var k:=a.Where(x->x=2).Count; // подсчитываем количество двоек
writeln('Не сдали экзамен: ',k,' чел. Это ',100*k/15:4:1,'%'); // выводим на эран результаты
// б)
writeln('Данные по продаже компьютеров:');
var b:=ArrRandom(7,5,20); b.Println; // генерируем и выводим результаты продаж
writeln('По возрастанию:');
b.Sorted.Println; // сортируем по возрастанию и выводим
end.
Пример:
Результаты сдачи экзамена:
3 3 3 2 4 3 4 4 3 3 5 2 2 5 5
Не сдали экзамен: 3 чел. Это 20.0%
Данные по продаже компьютеров:
16 20 16 14 5 18 16
По возрастанию:
5 14 16 16 16 18 20
#include <iostream>
#include <cmath>
using namespace std;
int main() {
int n=0;
cin>>n;
long long nn=pow(n,2);
cout<<nn<<endl;
while(nn!=0)
{
if(nn%10==6){cout<<"DA"; break;}
nn/=10;
}
if(nn==0)cout<<"NET";
return 0;
}