ProPlay.ru
  ГЛАВНАЯ    НОВОСТИ    СТАТЬИ    КОМАНДЫ    ДЕМКИ    VOD'ы    СТАВКИ    ТУРНИРЫ    КЛУБЫ    ФОРУМЫ    ГАЛЕРЕИ    РЕКЛАМА    САЙТ   
English Китайский
Забыли пароль?
Регистрация

     Расписание ProPlayTV
Мы ищем стримеров по League of Legends и DOTA2!
    Самые богатые
 ggtt 2664
 Hvostyn 2400
 GopaveC 2000
 rmn1x 2000
 Akon 1958
 razdavalochka 994
 CoolMast 700
 Devostatortk 606
 modify2h 600
 Boevik 400
    События ProPlay.ru

Сезон ставок The International 2015

    Голосование

The Internaitonal 2015 был
Лучше предыдуших
Хуже предыдущих
Такой же



    Counter-Strike: Global Offensive
Counter-Strike: Global Offensive #1
csgo.proplay.ru:27016 0/
Counter-Strike: Global Offensive #2
csgo.proplay.ru:27215 0/
    Репортажи
SLTV StarSeries 6: Репортаж
SLTV StarSeries V: CS Global Offensive
Рейтинг ProPlay.ru: Январь 2013
Fnatic FragOut CS:GO League
SLTV StarSeries #4 CS:GO
SLTV Star Series #3: Репортаж
GosuLeague #3: Репортаж
SLTV Star Series #2: Репортаж
The Premier League Season 2: Репортаж
36ON.RU BATTLE CITY: Плей-офф
Fantasy Football - Евро 2012: Лига ProPlay.ru
Rising Stars Challenge
36ON.RU BATTLE CITY: Групповой этап
FnaticRC CS League: Групповой этап
It's Gosu's Monthly Madness: 2 сезон
36ON.RU BATTLE CITY: 2й квалификационный тур
The Premier League: 2 cезон
Fantasy Football - UEFA Champions League лига ProPlay.ru
36ON.RU BATTLE CITY: 1й квалификационный тур
36ON.RU BATTLE CITY: Составы команд





    #1   AstalavistaO_o @ 12.02.08 20:15 [пожаловаться]   
У меня есть проблема-я ничерта не понимаю в програмировании в паскалеSad Мне дали 2 задачки(элементарные),которые надо сдать,иначе мне капец...,но я ,как уже сказал,в этом не шарю( Ограмная просьба для вменяемой части посетителей пп - помогите с решением!

1)Дана дата рождения человека. Посчитать сколько полных лет он прожил.

2)Даны 3 числа. Выяснить могут ли они являться сторонами треугольника? Если да,то определить какой это треугольник(равнобедренный,равносторонний,прямоугольный или тупоугольный)

Прошу не заливать грязью меня.Знаю,что это не трудно,но я в информатике мало понюмаю.
    #5   Marchello @ 12.02.08 20:17 [пожаловаться]   
Могу дать совет - когда я не мог решать задачки в институте, то платил челам, которые делали это за меня. Думаю если совсем плохо будет - поищи в яндексе таких челов, хотя у меня прям на доске с расписаниеями были наклеены объявления о том, что помогают решать задачи =)

Удачи тебе. Может и тут кто даст совет.
    #6   CQC @ 12.02.08 20:26 [пожаловаться]   
program one
var gr,v,g:integer;
begin
writeln('введите год рождения');
readln(gr);
writeln('введите текущий год');
readln(g);
v:=g-gr-1;
writeln('возраст',v);
readln;
end.
    #7   sluff @ 12.02.08 20:29 [пожаловаться]   
#6 неправильно
    #9   AstalavistaO_o @ 12.02.08 21:56 [пожаловаться]   
А что именно не правильно?Исправте пожалуйста Wink
    #10   Freeman @ 12.02.08 21:59 [пожаловаться]   
№6 всё прально, тока дана дата, а не год, ну в этом случае чуть посоложнее
№1 млин, лень писать... сделаю за 50 wmz Laughing
    #11   ghost_17 @ 12.02.08 22:12 [пожаловаться]   
program2
uses crt;
var
a,b,c:integer;
begin
clrscr;
write('a?');
readln(a);
write('b?');
readln(b);
write('c?');
readln(c);
if (a>b+c) or (b>a+c) or (c>a+b) then write ('takogo ne mozhet bit') else
if (a=b) and (b=c) then write ('ravnostoronniy treugolnik') else
if (a*a=b*b+c*c) or (b*b=a*a+c*c) or (c*c=a*a+b*b)
then write ('pramougolniy treugolnik') else
if ((a=b) or (a=c) or (b=c)) and not ((a=b) and (b=c))
then write ('ravnobedrenniy treugolnik') else
write('obichniy treugolnik');
end.
    #12   AstalavistaO_o @ 12.02.08 22:14 [пожаловаться]   
Огрооомнейшее спасибо)))
    #13   ghost_17 @ 12.02.08 22:21 [пожаловаться]   
var
god1,god2,mesac1,mesac2,den1,den2,vozrast:integer;
begin
write('god rozhdeniya?');
readln(god1);
write('mesac rozhdeniya?');
readln(mesac1);
write('den rozhdeniya?');
readln(den1);
write('kakoy seychas god?');
readln(god2);
write('kakoy seychas mesac?');
readln(mesac2);
write('kakoy seychas den?');
readln(den2);
if mesac2>mesac1 then vozrast:=god2-god1;
if (mesac2=mesac1) and (den2<=den1) then vozrast:=god2-god1 else
if (mesac2=mesac1) and (den2>den1) then vozrast:=god2-god1-1;
if mesac2
writeln;
writeln(vozrast);
end.
    #15   no_clan.tmp @ 13.02.08 02:13 [пожаловаться]   
#10 lol
#6 если у него не 1 января день рождения, то не заработает прога (((
    #16   Re-Venger @ 13.02.08 02:19 [пожаловаться]   
Чистый код, копируй бестрее. ЖдщдЖ

Program SurprizPrepodu;
Var x,y,z=integer;
Writeln('vvedite datu rojdeniya:',x,'.',y,'.',z);
Writeln('Spasibo, sha podumau');
Wtiteln('FAK YOU SPILBERG! CHE NE GDAL, BARAN? SOSI MNE POH NA SESSIU, YA V ARMIU HOCHU! Very Happy');
End.

    Ответить
Very Happy Smile Sad Surprised Shocked Confused Cool Laughing Mad Razz Embarassed Crying or Very sad Evil or Very Mad Twisted Evil Rolling Eyes Wink Exclamation Question Idea Arrow

Новая тема
Подписаться

    Партнеры


Турниры ESL


    Нас можно найти тут:
vkontakte ProPlay.ru - Официальная группа
mirc Наш канал в IRC
Facebook Мы в Facebook
Twitter Мы в Twitter

    Будущие турниры

Добавить турнир



    Последние дневники
Online casino (3)
НУЖЕН СОВЕТ БРАБЛЕЯ (13)
СМОКЕРПУП (0)
мои соски упруги, а ваши ... (3)
Записки без смысла [5] (16)
Ф (1)
Я вернулась. Olya (12)

    Случайные галереи
c1q3: типо госу-дотер

peemouzez4Y: ParkwayDrive 1.

xeter eba:

p0keta:


    Ищем авторов!

ProPlay.ru ищет новых авторов. Прочитайте "Памятку для авторов" и, если заинтересовались, пишите нам editor@proplay.ru


    Реклама
Fallout 2 ключ, F.E.A.R. 2: Project Origin дата выхода, игра Star Wars: The Clone Wars - Republic Heroes, Dungeon Lords



Rambler's Top100
Яндекс цитирования Rambler's Top100

Copyright © 2006-2011 www.proplay.ru. Все права защищены.
Полное или частичное использование материалов сайта www.proplay.ru возможно только с письменного разрешения редакции.