Вы не зашли.
Главная » Общение » скучно епт...
#821. POFIGISST Off (6)
Участник
2011.11.22 15:03
написал самую простую прогу на паскале для подсчета суммы a и b,весь код с комами сделал,код сюда выложу,может что-то не так сделал или есть вариант сделать код лучше,то подскажут кто нить)))

Код:
program summa_ab;
uses crt;
var a,b,rezult: integer; {Задаем имена переменных и определяем тип с которым будем работать}
BEGIN
clrscr; {Очистка экрана от гадости}
a : = 3; {Задали значение переменной a}
b : = 5; {Задали значение переменной b}
rezult : = a+b; {Выполняем действие(сумма)}
write (rezult); {Вывод на экран переменной rezult}
readln; {Задержка экрана}
 
END.
Отредактировано POFIGISST (2011.11.22 16:04)
#822. tipsun Off (19)
Moderator
2011.11.22 18:06
TLENS написал:
tipsun Ну на этот вопрос тебе каждый ответит по своему (каждый хвалит свое болото)
Смотря для чего надо.
Ну а так самый популярный это C/C++ или очень хорош объектно ориентирован C# для графических программ.
Я например сейчас учу с нуля чистый Си. Хочешь давай вместе учить и ничего сложного там нет, я за вчера закончил первую главу сегодня думаю вторую изучить.
Ниже книга автора языка в chm формате. Автор очень внятно объясняет. + на каждый урок задачки.
Премного благодарен smile
#823. POFIGISST Off (6)
Участник
2011.11.22 19:07
накатал простенькую программку по нахождению среднего трех чисел,вот сюда её выкину так как это моя первая программка после некоторого перерыва)
Вложения
srednee.zip 26kb [загрузок: 412]
#824. tipsun Off (19)
Moderator
2011.11.22 23:11
Работает smile
#825. POFIGISST Off (6)
Участник
2011.11.22 23:11
tipsun
если над,могу исходних выложитьsmile
#826. tipsun Off (19)
Moderator
2011.11.22 23:11
Выложи, если не трудно. Интересно как там вводятся значения. smile
#827. POFIGISST Off (6)
Участник
2011.11.23 00:12
tipsun
Вот весь код проги)

Код:
program srednee;
 
uses srt;
 
var a,b,c : integer;
sum : real;
 
BEGIN
clrscr;
write('Введите первое число'); readln (a);
write('Введите второе число'); readln (b);
write('Введите третье число'); readln (c);
sum := a+b+c;
sum := sum/3;
write ('Среднее арифмитическое чисел',a,',',b,',',c,' равно',sum :5:2);
readln;
 
END.
#828. TLENS Off (14)
Moderator
2011.11.23 06:06
Gemorroj написал:

кстати, известная штука, могут на собеседованиях спрашивать, как поменять 2 переменные местами, не использую 3 переменную.
Код:
$sort[$i] ^= $sort[$n] ^= $sort[$i] ^= $sort[$n];
Заумная вещь. Только понял как оно работает.
...Учу побитовые операторы))
#829. POFIGISST Off (6)
Участник
2011.11.23 11:11
Бля,днс у домена сменить не могу(( такую хрень пишет "Не удалось изменить DNS-сервера. Не удалось получить значение estOrderId." ща в поддержку напишу чтоб сменили)
#830. tipsun Off (19)
Moderator
2011.11.23 12:12
Я наверно снова попытаюсь Ubuntu поставить.
В этот раз немного почитаю в инете "ЧАВО".
Отредактировано tipsun (2011.11.23 12:12)
Страниц: 181 82 83 84 85121 Все
Главная
WEB
PunBB Mod v0.6.2
0.034 s