Pascal

[t0rmenT]

Посоны хелпуйте  :NYyes: хз туда-не туда тему создал...

21. Написать программу, которая по паролю будет определять уровень доступа сотрудника к секретной информации в базе данных. Доступ к базе имеют только шесть человек, разбитых на три группы по степени доступа. Они имеют следующие пароли: 9583, 1747 - доступны модули баз А, В, С; 3331, 7922 - доступны модули баз В, С; 9455, 8997 - доступен модуль базы С.

 

это условный оператор,решений у меня нет

 

21. Дано натуральное число N (N > 9). Определить сумму цифр в первой половине числа (старшие разряды). Пример. N = 12 345 678. Сумма составляет 1 + 2 + 3 + 4 = 10. Это циклы

 

21. Натуральное число из n цифр является  числом  Армстронга, если сумма его цифр, возведенных в n-ю степень, равна самому числу.  Например:  153=13+53+33.  Получить все числа Армстронга, состоящие из трех цифр. Проверку числа оформить подпрограммой. Это процедуры и функции

 

 

21. Напишите программу, которая вводит строку и выводит ее, сокращая каждый раз на 1 символ до тех пор, пока в строке не останется 1 символ. Это строки

 

Помогите решить! просто в этот период болел нихуя не учил и понял что я уёбок просто кто чё решить может посоны от души спасибо! С наступающим офк  :NYavtoradolf:

[Mamatehc]

Pascal

 

 

Дальше не читал. Очередной умственноотсталый первокурсник.

[Storsnic]

Посоны хелпуйте  :NYyes: хз туда-не туда тему создал...

21. Написать программу, которая по паролю будет определять уровень доступа сотрудника к секретной информации в базе данных. Доступ к базе имеют только шесть человек, разбитых на три группы по степени доступа. Они имеют следующие пароли: 9583, 1747 - доступны модули баз А, В, С; 3331, 7922 - доступны модули баз В, С; 9455, 8997 - доступен модуль базы С.

 

это условный оператор,решений у меня нет

 

21. Дано натуральное число N (N > 9). Определить сумму цифр в первой половине числа (старшие разряды). Пример. N = 12 345 678. Сумма составляет 1 + 2 + 3 + 4 = 10. Это циклы

 

21. Натуральное число из n цифр является  числом  Армстронга, если сумма его цифр, возведенных в n-ю степень, равна самому числу.  Например:  153=13+53+33.  Получить все числа Армстронга, состоящие из трех цифр. Проверку числа оформить подпрограммой. Это процедуры и функции

 

 

21. Напишите программу, которая вводит строку и выводит ее, сокращая каждый раз на 1 символ до тех пор, пока в строке не останется 1 символ. Это строки

 

Помогите решить! просто в этот период болел нихуя не учил и понял что я уёбок просто кто чё решить может посоны от души спасибо! С наступающим офк  :NYavtoradolf:

Да, ты прав. Согласен.

[dinkelan]

Элементарные задачи, пусть тебя выпрут, сучара. Нахуя еще 1 индус в наших рядах  :NYsmile:

[equl1brew]

Посоны хелпуйте  :NYyes: хз туда-не туда тему создал...

21. Написать программу, которая по паролю будет определять уровень доступа сотрудника к секретной информации в базе данных. Доступ к базе имеют только шесть человек, разбитых на три группы по степени доступа. Они имеют следующие пароли: 9583, 1747 - доступны модули баз А, В, С; 3331, 7922 - доступны модули баз В, С; 9455, 8997 - доступен модуль базы С.

 

это условный оператор,решений у меня нет

 

21. Дано натуральное число N (N > 9). Определить сумму цифр в первой половине числа (старшие разряды). Пример. N = 12 345 678. Сумма составляет 1 + 2 + 3 + 4 = 10. Это циклы

 

21. Натуральное число из n цифр является  числом  Армстронга, если сумма его цифр, возведенных в n-ю степень, равна самому числу.  Например:  153=13+53+33.  Получить все числа Армстронга, состоящие из трех цифр. Проверку числа оформить подпрограммой. Это процедуры и функции

 

 

21. Напишите программу, которая вводит строку и выводит ее, сокращая каждый раз на 1 символ до тех пор, пока в строке не останется 1 символ. Это строки

 

Помогите решить! просто в этот период болел нихуя не учил и понял что я уёбок просто кто чё решить может посоны от души спасибо! С наступающим офк  :NYavtoradolf:

 

сделаю не бесплатно, пиши ЛС.

[Гость]

ответ 2

[justice_st]

21*2=42  :NYtrollface:

[t0rmenT]

Посоны хелпуйте  :NYyes: хз туда-не туда тему создал...

21. Написать программу, которая по паролю будет определять уровень доступа сотрудника к секретной информации в базе данных. Доступ к базе имеют только шесть человек, разбитых на три группы по степени доступа. Они имеют следующие пароли: 9583, 1747 - доступны модули баз А, В, С; 3331, 7922 - доступны модули баз В, С; 9455, 8997 - доступен модуль базы С.

 

это условный оператор,решений у меня нет

 

21. Дано натуральное число N (N > 9). Определить сумму цифр в первой половине числа (старшие разряды). Пример. N = 12 345 678. Сумма составляет 1 + 2 + 3 + 4 = 10. Это циклы

 

21. Натуральное число из n цифр является  числом  Армстронга, если сумма его цифр, возведенных в n-ю степень, равна самому числу.  Например:  153=13+53+33.  Получить все числа Армстронга, состоящие из трех цифр. Проверку числа оформить подпрограммой. Это процедуры и функции

 

 

21. Напишите программу, которая вводит строку и выводит ее, сокращая каждый раз на 1 символ до тех пор, пока в строке не останется 1 символ. Это строки

 

Помогите решить! просто в этот период болел нихуя не учил и понял что я уёбок просто кто чё решить может посоны от души спасибо! С наступающим офк  :NYavtoradolf:

 

сделаю не бесплатно, пиши ЛС.

было бы бабло на вебмани((

[Mamatehc]

21.

readln(s);

ln:=length(s);

repeat

  delete(s,ln,1);

  writeln(s);

  length(s):=ln;

until ln=1;

 

не проверял офк. а ну они у тебя все 21. это про строки.

 

[t0rmenT]

21.

readln(s);

ln:=length(s);

repeat

  delete(s,ln,1);

  length(s):=ln;

until ln=1;

 

не проверял офк.

всёравно спасибо за то,что уделил время

[VOVA_RADIANCE]

я как школьник не учивший паскаль две сделать могу ,но нет. :NYvihui: с новым годом

[Gydz]

only c++ :NYnate:

[justice_st]

readln(s);

println(s);

repeat 

  delete(s,ln,1);

  println(s);

  ln:=length(s);

until ln=1;

походу так

[Mamatehc]

ну да, врайтлн забыл.

[meleuz]

http://cyber.kg - напиши там

[t0rmenT]

я как школьник не учивший паскаль две сделать могу ,но нет. :NYvihui: с новым годом

и тебя с новым годом

[Nekon]

ответ 42, почему? потому что 42

[AmigoEgg]

Program PD1;

Var a:integer;

begin

Write('Пароль:');

read(a);

if a=9583 then writeln('Уровень доступа A');

if a=1747 then writeln('Уровень доступа  A');

if a=3331 then writeln('Уровень доступа  B');

if a=7922 then writeln('Уровень доступа  B');

if a=9455 then writeln('Уровень доступа  C');

if a=8997 then writeln('Уровень доступа  C');

end.

[t0rmenT]

21. Натуральное число из n цифр является  числом  Армстронга, если сумма его цифр, возведенных в n-ю степень, равна самому числу.  Например:  153=13+53+33.  Получить все числа Армстронга, состоящие из трех цифр. Проверку числа оформить подпрограммой. Это процедуры и функции

153=1^3+5^3+3^3

[OLEJKATELEJKA]

Посоны хелпуйте  :NYyes: хз туда-не туда тему создал...

21. Написать программу, которая по паролю будет определять уровень доступа сотрудника к секретной информации в базе данных. Доступ к базе имеют только шесть человек, разбитых на три группы по степени доступа. Они имеют следующие пароли: 9583, 1747 - доступны модули баз А, В, С; 3331, 7922 - доступны модули баз В, С; 9455, 8997 - доступен модуль базы С.

 

это условный оператор,решений у меня нет

 

21. Дано натуральное число N (N > 9). Определить сумму цифр в первой половине числа (старшие разряды). Пример. N = 12 345 678. Сумма составляет 1 + 2 + 3 + 4 = 10. Это циклы

 

21. Натуральное число из n цифр является  числом  Армстронга, если сумма его цифр, возведенных в n-ю степень, равна самому числу.  Например:  153=13+53+33.  Получить все числа Армстронга, состоящие из трех цифр. Проверку числа оформить подпрограммой. Это процедуры и функции

 

 

21. Напишите программу, которая вводит строку и выводит ее, сокращая каждый раз на 1 символ до тех пор, пока в строке не останется 1 символ. Это строки

 

Помогите решить! просто в этот период болел нихуя не учил и понял что я уёбок просто кто чё решить может посоны от души спасибо! С наступающим офк  :NYavtoradolf:

Я ТЯ НЕ ЗНАЮ ПОМОГАТЬ НЕ БУДУ .