ПРОГРАМИРАЊЕ И ПРОГРАМСКИ ЈАЗИЦИ

[Macedalien]

Два пати кликни на *.exe и ке ти се отвори.

Не ме интересира готов егзекутив :wink:

 

[јахутерминал]

Не ме интересира готов егзекутив :wink:

Мац ти се допаѓа програмчето?

 

[bad_boy]

lele od glup poglup e hehe videte sami

 

[CT]

Iskreno kazhano?
Zoshto nekoj bi pravel neshto vo Pascal ?
Ne razbiram.. daj mi edna prichina, i samo edna.
Java, on the other hand.. platform-independent.. portable code.
Jezda pravime muabet za najmozhno osnovno nivo, no sepak .. nishto ne dobivate ako pochnete pascal.

 

[јахутерминал]

lele od glup poglup e hehe videte sami

Добро де мала грешка. Еве ја поправката. Не цепидлачи. Ај пробај сега и пушти скриншат.

 

[MkForces]

Добро де мала грешка. Еве ја поправката. Не цепидлачи. Ај пробај сега и пушти скриншат.

Изгледа не ти работи пак програмчето

 

[naum_spaseski]

Остај то, туку и условите не функционираат како што треба, на пример она за над осум сати работа. Сакам да го направам тоа од IGI во Visual Basic, ама тоа некој друг ден, сега немам време, петок тест имам математика :nesum:

 

[јахутерминал]

Изгледа не ти работи пак програмчето

Добро де, сум заборавил да го снимам. Ај сега пробај го и пак прати скриншат молим те.

 

[MkForces]

Добро де, сум заборавил да го снимам. Ај сега пробај го и пак прати скриншат молим те.

Океј е сега . Нема потреба од скриншати.

 

[naum_spaseski]

Добро де, сум заборавил да го снимам. Ај сега пробај го и пак прати скриншат молим те.

Еј, а оној другиот услов, ако надмине 8 часа во работен ден, да се плаќа по 1,5 часа, исто и во сабота, сега не знам точниот услов ама така е некако. Среди го и тоа, мислам дека и таму имаш грешки.

 

[јахутерминал]

Еј, а оној другиот услов, ако надмине 8 часа во работен ден, да се плаќа по 1,5 часа, исто и во сабота, сега не знам точниот услов ама така е некако. Среди го и тоа, мислам дека и таму имаш грешки.

Немам грешки, така е поставен условот. Направив ако над 12 часа пише да му кажува грешка и да мора повторно да внесе вредност. Пробај, па кажи ми.

 

[naum_spaseski]

Немам грешки, така е поставен условот. Направив ако над 12 часа пише да му кажува грешка и да мора повторно да внесе вредност. Пробај, па кажи ми.

Така кажи, ова ке ти го сметав за грешка, зашто условот го кажа IGI не е истиот со овој.

 

[јахутерминал]

Така кажи, ова ке ти го сметав за грешка, зашто условот го кажа IGI не е истиот со овој.

Иначе сега ќе преминам и на VB.NET, имам книга од Славчо Горчески и така, уште малку ми остана Pascal.

 

[Macedalien]

Мац ти се допаѓа програмчето?

Идејата е добра ама дај го кодот :star:

 

[јахутерминал]

Идејата е добра ама дај го кодот :star:

Еве го кодот:

program test;
uses
wincrt;
var ime:string;
    pari,saati1,saati2,n:real;
    i:integer;
begin
writeln('Dojbredojde vo programot na jaxyterminal');
writeln('Napisi go imeto na vraboteniot');
readln(ime);
writeln('Kolku ke go platis ',ime,' na saat (sumata e vo dolari)');
readln(pari);
n:=0;
for i:=1 to 5 do
begin
writeln('Napisi kolku saati rabotel den',' #',i,' i pritisni enter:');
repeat
readln(saati1);
if saati1>12 then writeln('Vnesete cas ispod 12 ili 12');
until (saati1<=12);
n:=saati1+n;
end;
writeln('Kolku saati rabotel vo sabota?');
repeat
readln(saati2);
if saati2>=6 then
writeln('Ve molime vnesete validnen broj na casovi (ispod 5 ili 5)');
until (saati2<6);
writeln('Kratok pregled na vraboteniot',ime);
writeln('Vkupno rabotni casa ',n+saati2:2:2);
writeln('Vkupno zaraboteno ',pari*(n+saati2):2:2,'$');
writeln('Prijaten den');

end.

Ова ти е најкраток код за оваа програма.
Едит:writeln('Kratok pregled na vraboteniot',ime);
Ситно е не е страшно. Битно програмот функционира во целост.