• Авторизация


12.04.2012 12-04-2012 11:35 к комментариям - к полной версии - понравилось!


program TpeTbe_3adaHue;
uses crt;
var a,b,c,d,e:integer;
begin
clrscr;
write('a=');
readln(a);
write('b=');
readln(b) ;
write('c=') ;
readln(c) ;
write('d=') ;
readln(d) ;
write('e=') ;
readln(e) ;
if (a>10000) or (b>10000) or (c>10000) or (d>10000) or (e>10000) then writeln('nJloxou kupnu4uk :( ') else
if (d*e)>=(a*c) then writeln('DA!') else
if (d*e)>=(a*b) then writeln('DA!') else
if (d*e)>=(a*c) then writeln('DA!') else writeln('NO');
readln
end.
вверх^ к полной версии понравилось! в evernote


Вы сейчас не можете прокомментировать это сообщение.

Дневник 12.04.2012 | Jam316 - Дневник БМВвода | Лента друзей Jam316 / Полная версия Добавить в друзья Страницы: раньше»