Всего дискет 8. какой бы не была дискета с инфой, информация об этом весит одинаково
8 = 2^3 т.е. 3бита
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadlnString.ToWords.Count.Println
end.
<h2>Пример</h2>
Наша Маша громко плачет уронила в речку мячик
8
//PascalABC.Net 3.2
function f(x:real):=1/(x*sqr(x)-2*x);
begin
write ('y=', f(readreal('Введите x: ')));
end.
Алгоритмический язык:
нач
ввод (x);
вывод (1/x^3-2x);
кон
№1
#include <iostream>
using namespace std;
int main(){
int a=1, s=0;
while (a!=8) {
++a;
s+=a;
}
cout<<s;
}
№2
#include <iostream>
using namespace std;
int main(){
string a;
char b;
int c=0;
cout << "Ваше число - ";
cin >> a;
cout << "Цифра для поиска - ";
cin >> b;
for (int i=0; i<a.length(); ++i)
if(a[i]==b) ++c;
cout<<"Данная цифра в числе встречается "<< c <<" раз(а)";
}
№3
#include <iostream>
#include <math.h>
using namespace std;
int main(){
double x, y;
cin>>x;
for(int a=-1; a<=2; ++a){
if(a<=1) y=log(abs(a*x+1));
else y=a*a+cos(a*x);
cout<<"a="<<a<<" y="<<y<<endl;
}
}
<span>наверно переносчик данных но я точно не знаю</span>