Типичное задание на круги Элепса Ответ:4213
Вот вам программа, пробовала компилировать и запускать на free-pascal, на всем остальном тоже должно пойти
Компьютер состоит из монитора и системного блока. Это его неотъемлемые части. Также к нему подключаются клавиатура, мышь, колонки. В дисковод можно вставить диск. Но есть и более современный вариант:флешка.
На компьютере можно создавать программы, презентации, предоставлять другим какую-либо информацию.
Для менее продвинутых пользователей существует программы "Помощник".
Также компьютер можно использовать как средство общения
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
Writeln(Range(1,ReadInteger,2).Aggregate(BigInteger(1),(p,q)->p*q))
end.
//решение первой задачи
#include <iostream>
using namespace std;
int main(){ setlocale(LC_ALL,"RUS");
int a,b,c; cout<<"Введите три числа:\n"; cin>>a>>b>>c; cout <<"Введенные числа:\na = "<<a<<"\nb = "<<b<<"\nc = "<<c; if (a>0) a*=a; if (b>0) b*=b; if (c>0) c*=c; cout<<"\nРезультат:\na = "<<a<<"\nb = "<<b<<"\nc = "<<c;
return 0;}
// решение второй задачи
#include <iostream>
using namespace std;
int main(){ setlocale(LC_ALL,"RUS");
int i;
for (i=10;i<=22;i++) cout<<i<<" дюймов = "<<i*25.4/10<<" см\n";
return 0;
}
//решение третьей задачи
#include <iostream>
#include <math.h>using namespace std;
int ves (float s, float t){ return (s/(1+t*t))+(t/(1+s*s))-pow(s-t,3);}
int main(){ setlocale(LC_ALL,"RUS");
float s,t;
cout<<"Введите два числа s и t: "; cin>>s>>t; cout<<"H(s,t)+(max(H^2(s-t,s*t),H^4(s-t,s+t))+H(1,1)) = "<<ves(s,t)+max(pow(ves(s-t,s*t),2),pow(ves(s-t,s+t),4))+ves(1,1);}