Категория
Информатика, опубликовано 27.01.2019 23:10

Нужно написать программы на паскале! 1) дано целое число m> 1. получить наибольшее целое k, при котором 4^k(четыре в степени k)

Ответы

Ответ
Ответ оставил: Гость

program z1; vari,j,m,k,z,x,l: integer; beginreadln(m); for i: =0 to m do begin z: =1; if i=0 then z: =1 else beginx: =i; while x< > 0 do beginz: =z*4; x: =x-1; end; end; if ((z< m) and (z*4> m)) then writeln(i); if z=m then writeln(i-1); end; end.

 

program z2; vari,j,n,k,z,x,l: integer; beginreadln(n); for i: =0 to n do begin z: =1; if i=0 then z: =1 else beginx: =i; while x< > 0 do beginz: =z*2; x: =x-1; end; end; if ((z> n) and (z/2< n)) then writeln(i); if z=n then writeln(i+1); end; end.

 

program z3; vari,j,n,k,z,x,s: integer; beginreadln(n); s: =0; for i: =1 to n do begin z: =1; for j: =i to 2*i doz: =z*j; s: =s+z; end; writeln(s); end.

 

время 2 ночи 

пора спать ) 

Ответ
Ответ оставил: Гость
Дааааааааааааааааааааааааааааааааааааааа

Ответ
Ответ оставил: Гость
Если бы тетрадь был с мной там у меня есть
Ответ
Ответ оставил: Гость
Конечно же А: Блок-схема. Графическое представление алгоритма


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 3 на вопрос по информатике: Нужно написать программы на паскале! 1) дано целое число m> 1. получить наибольшее целое k, при котором 4^k(четыре в степени k)... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube