Да очень просто: переписываешь на какой-нибудь вменяемый язык, выполняешь и смотришь результат.

javascript:function F(n){return(n>1?F(n-1)+G(n-1):n+1);}function G(n){return(n>1?G(n-1)+F(n):n-1);}alert(F(5));

Даёт 26.

0 0

4 года назад

Что больше? А) 8000 бит Б)1001 байт В)1 Кбайт Г) 0.001 Мбайт

Shareaza

Переведем все в биты.
А)8000 бит
Б)1001 байт=8008 бит
В)1кбайт=1024байта=8192 бит
Г)1мбайте-1024 кбайта,1кбайте-1024 байта,в 1 байте-8 бит,след.1мбайт=1024*1024*8=8388608 бит
8388608*0,001=8388,608 бит
След,ответ Г).

0 0

4 года назад

Написать программу вывода всех четных чисел в диапазоне от 2 до 100 блоксхема

Губайдуллин Артур

Vari:integer;beginfor i:=2 to 100 doif i mod 2 = 0 thenwrite(i, ' ')end.

0 0

4 года назад

Помогите пожалуйста, напишите программу Паскаль, буду очень благодарна

Миленок

var a,k: integer;

begin

k:=0;

readln(a);

while a<>0 do

begin

if a mod 4 = 0 then k:=k+1;

readln(a);

end;

writeln('k = ',k);

end.

Пример:

k = 2

var a,k: integer;

begin

k:=0;

readln(a);

while a<>0 do

begin

if (a>9)and(a<100)and(a mod 10 = 4) then k:=k+1;

readln(a);

end;

writeln('k = ',k);

end.

Пример:

204

k = 1

0 0

4 года назад

Прочитать ещё 2 ответа