Var
i,s:integer;
begin
i:=1; s:=0;
while i<=99 do
begin s:=s+i; i:=i+2 end;
Writeln(s)
end.
Тестовое решение:
2500
1)
<span>#include<iostream>
#include<cmath>
void main()
{
char ch1, ch2;
int vol1, vol2;
std::cin >> ch1 >> vol1;
std::cin >> ch2 >> vol2;
if ((((abs(ch1 - ch2) <= 2) && (abs(vol1 - vol2) <= 2)) && ((ch1 != ch2) && (vol1 != vol2))) && !((abs(ch1 - ch2)==1) && (abs(vol1-vol2))==1))
std::cout << "Possible";
else
std::cout << "Impossible";
<span>}
3)
</span></span>#include<iostream>
using namespace std;
void main() {
<span>int n,m;
cin >> n,m;
cout<<n;
for(int i=n;i<=m;i++)
cout<<i+2;
}
4)
</span>#include <iostream>
<span>using namespace std;</span> void<span> main()</span>{<span>
int mass[2][4] //размерность своего массива вписывай.
</span><span> {</span><span>
{ 1, 2, 3, 4 }, //вписывай свои числа.
</span><span> { 1, 2, 3, 4 } </span><span>
}<span>;
</span></span>
for (int i=0 ; i<2;++i)
{
for (int j=0 ; j<4;++j)
{
if(mass[i][j]<0)
cout<<mass[i][j];
}
}
system("pause");
}
Program stoim;
const s=1.4;
var k,v:real;
begin
writeln('vremya min');
readln(v);
writeln('vyhodnoy - 1, rabochiy den - 2);
readln(k);
if k=2 then write('stoimost = ',v*s,' rub')
else write('stoimost = ',v*s*0.2,' rub');
readln;
end.
Не знаю, как у тебя, но у меня они просто заменяют друг друга, когда я их перетаскиваю мышкой на нужное место.