//Pascal ABC.NET 3.1 сборка 1256
Var
s:string;
a,b:real;
begin
readln(s);
a:=strtofloat(copy(s,1,pos('X',s)-1));
b:=strtofloat(copy(s,pos('=',s)+1,length(s)-pos('=',s)));
if (a=0) and (b=0) then
begin
writeln('X-любое действительное число');
exit;
end
else
if a=0 then
begin
writeln('Нет корней');
exit;
end;
writeln(b/a);
end.
Пример ввода:
-0.1X=10
Пример вывода:
-100
1)
#include <iostream>
using namespace std;
int main()
{
int n = 0;
cin >> n;
for (int i = 0; i < n; ++i) {
cout << 2 * i << endl;
}
return 0;
}
2)
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
int a = 0, b = 0;
cin >> a >> b;
for (int i = a; i <= b; ++i) {
cout << pow(i, 2) << endl;
}
return 0;
}
3)
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
int a = 0, b = 0, sum = 0;
cin >> a >> b;
for (int i = a; i <= b; ++i) {
sum += pow(i, 2);
}
cout << sum << endl;
return 0;
}
#include <cstdio>
<span>long long ans, a;
</span><span>int main()
</span><span>{
</span><span> scanf("%lld", &a); //считываем исходное число
</span><span> a *= a; //возводим исходное число в квадрат
</span><span> ans = a; //в ответе хранится квадрат исходного числа
</span><span> a *= a; //в a хранится 4 степень исходного числа
</span><span> a *= a; //в a хранится 8 степень исходного числа
</span><span> ans *= a; //2 степень исходного числа умножаем на 8 степень
</span><span> printf("%lld", ans); //выводим ответ
</span><span> return 0;
</span><span>}</span>
Эх, что-то мудрено получилось
переменных многовато