Мегаобучалка Главная | О нас | Обратная связь


Решение набора заданий на линейный алгоритм



2020-03-19 382 Обсуждений (0)
Решение набора заданий на линейный алгоритм 0.00 из 5.00 0 оценок




.   Опишите алгоритм ваших действий в течение дня.

Решение

)   Подъем;

)   Зарядка;

)   Завтрак;

)   Учеба;

)   Обед ;

)   Выполнение домашнего задания;

)   Прогулка;

)   Ужин;

)   Свободное время;

)   Отбой.

2. Выполнить алгоритм замены одной букву слова на другую что бы результатом являлось другое слово, в котором ни одна буква начального слова не присутствовала. Причем за один шаг можно поменять, только одну букву. (Чаша - Мирт (название растения); Пора - Жабо(отделка блузки))

Пример: Лоза - Поза - Пора - Пара - Парк

Решение:

 

Чаша - Мирт Пора - Жабо
Чаша Маша Миша Мира Мирт Пора Пара Жара Жаба Жабо

3. Опишите алгоритм фонетического разбора слова.

Решение:

)   Разделить слово на фонетические слоги;

)   Поставить ударение;

)   Определить сколько всего букв в слове;

)   Определить сколько всего звуков в слове;

)   Определить сколько всего гласных букв в слове;

)   Определить сколько всего согласных букв в слове;

)   Определить сколько всего твердых букв в слове;

)   Определить сколько всего мягких букв в слове;

)   Вывести количество слог, букв, звуков, гласных, согласных, твердых, мягких букв в слове и слог, на который падает ударение.

4. Известны количество жителей в государстве и площадь его территории. Определить плотность населения в этом государстве.

Решение:

 

Алгоритм: Код Pascal
1) Ввод количества жителей, площадь территории; 2) Определить Плотность населения, которое равно количество жителей / площадь территории; 3) Вывод плотности населения; var kolich,plotnost,ploshchad:real; begin writeln('Vvedite kolich,plotnost,ploshchad '); readln(kolich,plotnost,ploshchad); plotnost:= kolich / ploshchad; writeln(' plotnost =', plotnost); end.

 

5. Цех по ремонту бытовой техники имеет ежедневно прибыль Р, с которой платит налог 70%. Из оставшейся доли прибыли 30% идет на развитие производства, а остальное - на заработную плату 8 работникам. Какова среднемесячная зарплата работника, если в месяце 26 рабочих дней?

Решение:

 

Алгоритм: Код Pascal
1) Ввод прибыли (Р); 2) Определить остаток1 средств после выплаты налога, которое равно прибыль (Р) - (прибыль (Р) * 70 / 100); {где (прибыль (Р) * 70 / 100) - оплачиваемый налог в размере 70 %} 3) Определить остаток2 средств от развития производства, которое равно остаток1 - (остаток1 * 30 / 100); {где (остаток1* 30 / 100) - 30 % от оставшейся доли, который идет на развитие производства} 4) Определить з/п одного работника в день, которое равно остаток2 / количество работников (8); 5) Определить з/п одного работника в месяц, которое равно з/п одного работника в день*количество рабочих дней в неделю (26); 6) Вывод з/п одного работника в месяц. var p, о1, о2, zp1, zp2:real; begin writeln('Vvedite p '); readln(p); о1:= p-(p*70/100); О2:= о1-( о1*30/100); zp1:=o2/8; zp2:= zp1*26; writeln(' srednemesjachnaja zarplata rabotnika=', zp2); end.

 

6. Напишите программу, вычисляющую и выводящую на экран число бит, если задано число Мбайт.

Решение:

 

Алгоритм: Код Pascal
1) Ввод числа Мбайт (Х);  2) Определить количество бит в Х Мбайт, которое равно число Мбайт (Х)*1024*1024*8; 3) Вывод количество бит. var x,b:real; begin writeln('Vvedite x'); readln(x); b:=x*1024*1024*8; writeln('kolichestvo bit=',b); end.

 

7. Запросите у пользователя курсы доллара и евро на сегодняшний день и имеющуюся у него рублвую сумму, и рассчитайте, сколько долларов и сколько евро он может купить на эти деньги

Решение:

 

Алгоритм: Код Pascal
1) Ввод курса доллара(kd), курса евро(ke), рублевую сумму(sr); 2) Определить количество долларов, которое можно купить, и которое равно количество рублей(sr) делить нацело(div) на курс доллара(kd); 3) Определить количество евро, которое можно купить, и которое равно количество оставшихся рублей (sr mod kd) делить нацело(div) на курс евро(ke); 4) Вывод количество долларов и евро. или 5) Определить количество евро, которое можно купить, и которое равно количество рублей (sr) делить нацело(div) на курс евро(ke); 6) Определить количество доллара, которое можно купить, и которое равно количество оставшихся рублей (sr mod ke) делить нацело(div) на курс доллара(kd); 7) Вывод количество долларов и евро. var kd, ke, sr, kold, kole: integer; begin writeln('Vvedite kurs dollar, kurs evro i summu rublei'); readln(kd, ke, sr); kold:=sr div kd; kole:=(sr mod kd) div ke; writeln('kolichestvo dollarov=', kold, 'kolichestvo evro=', kole, 'ili');  kole:=sr div ke; kold:=(sr mod ke) div kd; writeln('kolichestvo dollarov=', kold, 'kolichestvo evro=', kole); end.

 

8. Запрашивайте у пользователя размер наследства, которое Вы бы хотели получить (в рублях), и сумму денег, которую вы собираетесь тратить в месяц. Выведите на экран время (в годах), на которые хватит этого наследства

Решение:

 

Алгоритм: Код Pascal
1) Ввод размера наследства (r) и траты в месяц(t); 2) Определить количество лет, которое равно размер наследства (r) поделить на трату в год (t*12); {трату в год находим произведением траты в месяц на количество месяцев в году} 3) Вывод количество лет. var r, t, g:real; begin writeln('Vvedite razmer nasledstva i tratu'); readln(r,t); g:=r/(t*12); writeln('nasledstva xvatit na',g, 'let'); end.

 

9. Рассчитайте количество часов, которое вы тратите на выполнение домашнего задания в день, если среднее количество предметов в день и среднее время (в минутах), затрачиваемое на подготовку к каждому предмету, запрашивается у пользователя вашей программ

Решение:

 

Алгоритм: Код Pascal
1) Ввод среднего количества предметов (sr_subj) и среднего количества времени на один предмет (sr_time); 2) Определить количество времени в часах, которое равно среднего количества предметов (sr_subj) * на среднего количества времени на один предмет (sr_time) и это все поделить на количество минут в часах; 3) Вывод количества времени. var sr_time,sr_subj:integer; rez:real; begin writeln('Vvedite srednee kol-vo predmerov '); read(sr_subj); writeln('Vvedir srednee kol-vo vremeny na odin predmet (min)'); read(sr_time); rez:=(sr_subj*sr_time)/60; writeln('Kol-vo chasov na vupolnenie ',rez); end.

 

10. Рассчитайте и выведите на экран количество рабочих часов в месяце, если продолжительность рабочего дня равна 8 часам в день, а число рабочих дней в месяце запрашивается у пользователя вашей программы

Решение:

 

Алгоритм: Код Pascal
1) Ввод количества рабочих дней в месяце(С); 2) Определить количество рабочих часов в месяце, которое равно количества рабочих дней в месяце(С) * на продолжительность рабочего дня (8); 3) Вывод количества рабочих часов в месяце. var c:integer; rez:real; begin writeln('Vvedite kolichestvo rabochix dnei v mesjacze'); read(c); rez:=c*8; writeln('Kol-vo rabochix chasov v mesjacze = ',rez); end.

 

11. Напишите программу, вычисляющую какую сумму денег нужно платить за электроэнергию, если у пользователя программы запрашивается количество КВт электроэнергии, которое было израсходовано за расчетный месяц, и какова плата за 1 КВт электроэнергии

Решение:

 

Алгоритм:Код Pascal  
  1) Ввод количество КВт электроэнергии, которое было израсходовано за расчѐтный месяц, и плата за 1 КВт электроэнергии; 2) Определить сумму денег нужную платить за электроэнергию, которая равна произведению количества КВт электроэнергии, которое было израсходовано за расчѐтный месяц, и платы за 1 КВт электроэнергии; 3) Вывод суммы. var ke, p, rez :real; begin writeln('Vvedite izrasxovovanoe kol-vo energii i platu za 1KBt '); read(ke,p); rez:=ke*p; writeln('summa = ',rez); end.

 

12. Чтобы вылечиться от простуды, нужно 20 таблеток «Колдрекса» либо 30 таблеток аспирина упса. Сколько порций эскимо можно купить на сэкономленные деньги, если соблюдать правила личной гигиены и закаливаться (то есть не болеть)?

Решение:

 

Алгоритм:Код Pascal  
  1) Ввод стоимости таблеток «Колдрекса» (sk), стоимости таблеток аспирина упса (sa), стоимости одной порции эскимо (sp); 2) Определить, количество порций эскимо если для лечения покупать таблетки «Колдрекса» которое равно стоимости таблеток «Колдрекса» (sk) *20 поделить нацело (div) на стоимость одной порции эскимо (sp); 3) Вывод количества порций. 4) Определить, количество порций эскимо если для лечения покупать таблетки аспирина упса, которое равно стоимости таблеток аспирина упса (sa) *30 поделить нацело (div) на стоимости одной порции эскимо (sp); 5) Вывод количества порций. var sk, sa, sp, rez : integer; begin writeln('Vvedite stoimost Koldreksa, stoimost asperina upsa i stoimost porzii eskimo'); read(sk, sa, sp); rez:= sk*20 div sp; writeln('kolichestvo pri pokupke Koldreksa = ',rez, 'ili');  rez:= sa*30 div sp;   writeln('kolichestvo pri pokupke asperina upsa = ',rez); end.

 

13. За год квартплата повышалась дважды. Первый раз на 30%, а второй на 40%. Год назад семья Березовских платила квартплату 80 рублей в месяц. Сколько они платят сейчас.

Решение:

 

Алгоритм: Код Pascal
  1) Присвоить стоимость квартплаты семьи год назад 80 рублям 2) Определить, количество квартплаты после первого повышения, которое равно стоимость квартплаты семьи год назад + (стоимость квартплаты семьи год назад*30/100); 3) Определить, количество квартплаты после второго повышения, которое равно стоимость квартплаты после первого повышения +(стоимость квартплаты после первого повышения *40/100); 4) Вывод стоимость нынешней квартплаты. var sk, sk1, rez : real; begin sk:=80; sk1:= sk+(sk*30/100); rez:=sk1+(sk1*40/100); writeln('stoimost kvartplati = ',rez); end.

 

14. Бабушка вяжет в неделю 3 пары детских носков, пару женских и пару мужских и продает их. Считая, что в месяце 4 недели, определить, какую прибыль бабушка имеет за месяц.

Решение:

 

Алгоритм: Код Pascal
  1) Ввод стоимости одной пары мужских носков (s1), стоимости одной пары женских носков (s2); 2) Определить, количество пар которое бабушка вяжет в месяц, которое равно произведению количества пар в неделю (3) на количество недель в месяце (4); 3) Определить, прибыль бабушки в месяц, которая равна сумме стоимости женской и мужской паре носков * их количество в месяц; 4) Вывод прибыли бабушки. var s1, s2, k, rez : integer; begin writeln('Vvedite stoimost muzhskix i zhenski noskov'); read(s1, s2, sp); k:=3*4;  rez:=(s1+s2)*k; writeln('pribil babuschki = ',rez); end.

 



2020-03-19 382 Обсуждений (0)
Решение набора заданий на линейный алгоритм 0.00 из 5.00 0 оценок









Обсуждение в статье: Решение набора заданий на линейный алгоритм

Обсуждений еще не было, будьте первым... ↓↓↓

Отправить сообщение

Популярное:
Как распознать напряжение: Говоря о мышечном напряжении, мы в первую очередь имеем в виду мускулы, прикрепленные к костям ...
Модели организации как закрытой, открытой, частично открытой системы: Закрытая система имеет жесткие фиксированные границы, ее действия относительно независимы...
Почему двоичная система счисления так распространена?: Каждая цифра должна быть как-то представлена на физическом носителе...



©2015-2024 megaobuchalka.ru Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. (382)

Почему 1285321 студент выбрали МегаОбучалку...

Система поиска информации

Мобильная версия сайта

Удобная навигация

Нет шокирующей рекламы



(0.006 сек.)