//Dev-C++ 4.9.9.2
#include <iostream>
using namespace std;
int main(){
int n,m=0;
cin>>n>>m;
cout<<(m+--n)<<endl<<(n---m)<<endl<<(m--<++n);
cin.get();
cin.get();
return 0;
}
var a, b, c: integer;
begin
readln(a, b, c);
if (a=-b)or(a=-c)or(b=-a)or(b=-c)or(c=-a)or(c=-b) then writeln('TRUE') else writeln('FALSE');
end.
256 вариантов - это 1 байт. 15 байт. И еще буквы
Сейчас вычисления совсем другие, не такие как раньше. Вычисляют погоду, ядерные реакции, движение планет. Но и задачи на компьютеры возлагают разные.Раньше не было персональных компьютеров. А сейчас они есть в довесок к супер компьютерам. Некогда раньше была принята стратегия популизировать ПК из военной сферы и области образования в область персонального использования. Поэтому сейчас пользоваться компьютером стало легче. Этому даже учат в школе. Все развивается. И растут области применения ПК.
Program qfdw;
uses crt;
Type
vershina=Record
Tochka:string;
X,Y:real;
end;
ps=File of vershina;
Var f:ps;
z,a,b,c:vershina;
i:integer;
Begin
assign(f,'1.dat');
rewrite(f);
writeln('Введите вершины треугольника и их координаты: ');
for i:=1 to 3 do
begin
writeln(i,'-я вершина');
write('буква: ');read(z.tochka);
write('X=');read(z.x);
write('Y=');read(z.y);
write(f,z);
end;
Close(f);
assign(f,'1.dat');
reset(f);
read(f,a);
read(f,b);
read(f,c);
close(f);
writeln('Cтороны треугольника:');
writeln(a.tochka,b.tochka,' = ',sqrt((a.x-b.x)*(a.x-b.x)+(a.y-b.y)*(a.y-b.y)):5:2);
writeln(c.tochka,b.tochka,' = ',sqrt((c.x-b.x)*(c.x-b.x)+(c.y-b.y)*(c.y-b.y)):5:2);
writeln(a.tochka,c.tochka,' = ',sqrt((a.x-c.x)*(a.x-c.x)+(a.y-c.y)*(a.y-c.y)):5:2);
end.