Ты молод4инка..))) Напеы ещё.......мне о4ень понравились твои стихи...))).
помогите решить!1) Ввести два числа (А, В).Найти их произведение, используя только операцию сложения.
Program ZXD;Var a,b:Integer;c:LongInt;BEGINWriteLn('Input a,b:');Write('Input a->');ReadLn(a);Write('Input b->');ReadLn(b);c:=0;For a:=1 to do c:=c+b;WriteLn('Mul ',c);ReadLnEND.
вау!пасиба :-******* сможешь еще решить?
меня еще есть задачка :))) Ввести два числа (А, В).Найти частное от деления нацело Патек Филип первого числа на второе (в переменную К) остаток от деления нацело (переменная Ost), используя только операцию вычитания.
надо решать помощью циклов.
Program ZXD;Var a,k:LongInt;b,Ost:Integer;BEGINWriteLn('Input a,b:');Write('Input a->');ReadLn(a);Write('Input b->');ReadLn(b);k:=0;While a>b do Begin a;=a-b;Inc(k) End;Ost:=a;WriteLn('Div ',k);WriteLn('Mod ',Ost);ReadLnEND.
Вот вторая:Program Balashova_2;uses crt;var a,b:integer; k,ost,temp:integer;begin clrscr;writeln('Enter number A: '); readln(a);writeln('Enter number B: '); readln(b);while (temp<a) do begintemp:=temp+b;if temp>a then begin ost:=a-(temp-b); break; end;inc(k);end;writeln('A divizion ',K);writeln('All symbols at Патек Филип point do last symbol of divizion ',ost);readkey; end.
вау еще одно решение!!! просто прекраснно.
ну меня еще есть задачи будете решать?
Жаль на группу нельзя вывести табличку "КРУГЛОСУТОЧНО".
бля братва не курите спайс.
ага, и все бросили).
я бросил и нехочу больше курить хуйня ебаная этот спайс бычий кайф.
ЦСКА вышел из группы,чего еще для счастья надо?мы сильные,и я думаю покажем себя с каким бы ни было соперником достойную игру!мне вот почему то кажется,Челси попадется.
ёёёё.я думал это обычная группа а это орловские братья.vceM DaroFF.
