Начало » Компьютеры » Программирование » Задачи » помогите с задачей на Pascal
помогите с задачей на Pascal [сообщение #21294] Чтв, 28 Февраль 2008 21:22 Переход к следующему сообщения

XEON в настоящее время не в онлайне XEON
Сообщений: 1
Появился: Февраль 2008

Подскажете пожалуйста правильно ли сделано?И какие есть еще варианты решения данной задачи?

задача : гадаешь на ромашке:любит ,не любит.каким будет ответ(любит или не любит) за исходное брать количество ЛЕПЕСТКОВ


uses wincrt;
var x=integer;
begin
write(Vvedite 4islo lepestkov ot 0,i menshe 21');
read(x);
cause x of
1 writeln('Lubit');
2 writeln('Ne Lubit');
3 writeln('Lubit');
4 writeln('Ne Lubit');
5 writeln('Lubit');
6 writeln('Ne Lubit');
7 writeln('Lubit');
8 writeln('Ne Lubit');
9 writeln('Lubit');
10 writeln('Ne Lubit');
11 writeln('Lubit');
12 writeln('Ne Lubit');
13 writeln('Lubit');
14 writeln('Ne Lubit');
15 writeln('Lubit');
16 writeln('Ne Lubit');
17 writeln('Lubit');
18 writeln('Ne Lubit');
19 writeln('Lubit');
20 writeln('Ne Lubit');
end;
end.
Re: помогите с задачей на Pascal [сообщение #21295 ответ на 21294 ] Чтв, 28 Февраль 2008 21:29 Переход к предыдущему сообщенияПереход к следующему сообщения

wats
Сообщений: 1146
Появился: Январь 2007

На слабенькую троечку сойдёт. Усложним задачу - ромашка чернобыльская и в ней 1244 лепестка [sm30] . Пиши код [sm29] .


http://i081.radikal.ru/1110/38/266505f52f4d.jpg
http://s53.radikal.ru/i140/1110/b3/ebed02f191dd.gif
Re: помогите с задачей на Pascal [сообщение #36750 ответ на 21294 ] Чтв, 28 Октябрь 2010 13:30 Переход к предыдущему сообщенияПереход к следующему сообщения

MAKO в настоящее время не в онлайне MAKO
Сообщений: 1
Появился: Октябрь 2010
Откуда: Россия


Аее дилетант)
вот как должно выглядеть

Program cvet;
var a:integer;
begin
Writeln('Vvedite chislo');
readln(a);
a:=a mod 2; {MOD- остаток от деления}
if a=1 then writeln('Lybit')
else writeln('ne lybit');
end.
icon3.gif  Re: помогите с задачей на Pascal [сообщение #36948 ответ на 21294 ] Сбт, 27 Ноябрь 2010 11:48 Переход к предыдущему сообщенияПереход к следующему сообщения

КПИ-7 в настоящее время не в онлайне КПИ-7
Сообщений: 2
Появился: Ноябрь 2010

На третьем курсе начали мы криптологию и шифрование изучать. Мрак! Там такие формулы, такие хитрые методы, без поллитра не разберёшься. Я думал, что умру, но зачёт не получу. Наткнулся в инете на сайтик www.fformula.net пишут, мол, решаем задачи. Ага, вот вам! Дай, думаю напишу, посмеюсь над ними, как они смогут в этой хренотени разобраться. Они меня обломали [sm30] и обрадовали, во всём разобрались, все 6 задачек по шифрованию сделали без сучка и задоринки, даже не поверил сначала, думал прикалываются. Преподу мои проги понравились, не знал куда от стыда деться, ну да главное зачёт получен, а теорию я уже сам сдал на "хорошо" [sm30]
Re: помогите с задачей на Pascal [сообщение #36949 ответ на 21294 ] Сбт, 27 Ноябрь 2010 12:56 Переход к предыдущему сообщенияПереход к следующему сообщения

olenytko в настоящее время не в онлайне olenytko
Сообщений: 963
Появился: Июнь 2009

ну и чем ты хвастаешся?
вместо того, чтобы самому сделать и разобратся и получить какие-то знания и навычки....
Re: помогите с задачей на Pascal [сообщение #36950 ответ на 21294 ] Сбт, 27 Ноябрь 2010 12:57 Переход к предыдущему сообщенияПереход к следующему сообщения

olenytko в настоящее время не в онлайне olenytko
Сообщений: 963
Появился: Июнь 2009

типа ты такой ловкий и хитрый...
столько времени потратил на нахождения ответа, вместого того, чтобы самому освоить, ты тупо использовал чужой интеллект...
выграл тактически, но проиграл статегически
Re: помогите с задачей на Pascal [сообщение #36951 ответ на 21294 ] Сбт, 27 Ноябрь 2010 13:01 Переход к предыдущему сообщенияПереход к следующему сообщения

КПИ-7 в настоящее время не в онлайне КПИ-7
Сообщений: 2
Появился: Ноябрь 2010

Если чесно, то не люблю я прогать, а вот ребята молодцы, сделали как надо:)
Re: помогите с задачей на Pascal [сообщение #36952 ответ на 21294 ] Сбт, 27 Ноябрь 2010 13:45 Переход к предыдущему сообщения

olenytko в настоящее время не в онлайне olenytko
Сообщений: 963
Появился: Июнь 2009

зачем тогда поступать на ту специальность, чт о ыт поступил? зачем там 5-6 лет учится?
Предыдущая тема:количество единиц в двоичной записи числа
Переход к форуму:
  


Текущее время: Срд Ноя 21 18:09:40 EET 2018

Время, затраченное на генерацию страницы: 0,15898 сек.
.:: Обратная связь :: Начало ::.

Реклама на сайте
Copyright © 2005 Бабенко Т.В. Все права защищены