Объяснение:
program XandY;
const
rndlim=50;
var
x, y : integer;
begin
x:=random(rndlim);
y:=random(rndlim);
Writeln('x=',x,' y=', y);
Writeln('x+y = ',x+y);
Writeln('x-y = ',x-y);
Writeln('x*y = ',x*y);
Writeln('x^2 + y^2 = ',sqr(x)+sqr(y));
end.
Запуск:
Free Pascal Compiler version 2.6.2-8 [2014/01/22] for x86_64
Copyright (c) 1993-2012 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling main.pas
Linking a.out
16 lines compiled, 0.2 sec
x=27 y=29
x+y = 56
x-y = -2
x*y = 783
x^2 + y^2 = 1570
ИТМО пишете?
GNU C++
#include <iostream>
#include <vector>
using namespace std;
signed main() {
int N,k=0;
cin>>N;
int a[N];
vector<pair<int,int> >b;
for(int i=0;i<N;i++)
{
cin>>a[i];
}
int c = 1;
for(int i=1;i<N;i++)
{
if (a[i]==a[i-1])
{
c++;
}
else
{
b.push_back(make_pair(a[i-1],c));
c=1,k++;
}
}
b.push_back(make_pair(a[N-1],c));
cout<<k<<endl;
for(int i=0;i<b.size();i++)
{
cout<<b[i].first<<' '<<b[i].second<<endl;
}
return 0;
}
Циклы используются для того, чтобы робот повторял какое-то действие, пока не выполнилось определенное условие. Или же циклы можно повторить определенное кол-во раз.
- При проведении соревновании "Сумо", робот должен найти робота-противника и вытолкать его за пределы ринга - черного круга. Значит, робот должен быть оснащен датчиком, умеющим определять предметы на расстоянии, и датчиком цвета. И еще спереди нужна конструкция для защиты датчика и для того, чтобы вытолкнуть соперника