Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
я думаю что основанием будет число 7
проверка: 7^2*1+7^1*2+7^0*2= 49+14+2=65
program m; uses crt; var k,s: real; i: integer; beginclrscr; for i: =1 to 10 dobegink: =i/(i+1); s: =s+k; end; writeln(s: 2: 2); readkey; end.
program month;
uses crt;
var a: integer;
begin
clrscr;
write('vsatvte chislo');
read(a);
if (a=12) or (a=1) or (a=2) then write('zima')
else if (a=3) or (a=4) or (a=5) then write ('vesna')
else if (a=6) or (a=7) or (a=8) then write ('leto')
else write('oseni');
repeat until keypressed;
end.
сетевые устройства наверное, если по минимуму
Популярные вопросы