while rand<>30 do
begin
//šis visticamāk dos intervālu 0...30 būs jādomā kā pielāgot
rand := Random(31);
if rand > max
then max:rand;
writeln(rand);
end;
writeln (max);
pirms 11 gadiem
Atbildes
Programma ģenerē gadījuma skaitļus intervālā no 5 līdz 30, cikls turpinās kāmēr ģenerētais skaitlis ir vienāds ar 30. Visi ģenerētie skaitļi tiek izvadīti uz ekrāna. Programma atrod un izdrukā lielāko ģenerēto skaitli.
kada varetu but programma, apmeram
Pirms 11 gadiem
balsis
pirms 11 gadiem
balsis
1000
Kļūstot par ekspertu pajauta.lv, Tu uzlabo savu klientu servisu un iegūsti papildus publicitāti. Tavas atbildes būs atrodamas 100 tūkstošiem pajauta.lv lietotāju, lieliski atradīs Google, kā arī varēsi izveidot savās web lapās vai draugiem.lv lapā īpašo pajauta.lv bloku.
500