Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
программа на паскале:
program xxx;
var i, n, s : integer;
begin
write ('введите n =' );
readln (n);
s: =0;
for i: =1 to n do
s: = s+ sqr(i+1);
writeln ('сумма =' , s);
readln
end.
смотря какая передача и каких данных, много чего придумать можно, мне кажется) телефон, радио, модем,рация. или просто- передатчик.
program;
var
max,val: integer;
label
start, ends;
max: =-50;
val: =50;
start:
if val> max then val: =val-10
if val=max then goto ends;
goto start;
ends:
Популярные вопросы