Задача на Паскал

[ibo9321]

Ако може да ми помогнете ще ви бъда благодарен:Да се състави програма на Паскал,която проверява дали по-голямото от две въведени цели числа се дели на 6 чрез признака за деление на 6.(Признак:Едно число се дели на 6,ако се дели едновременно на 2 и на 3.)Моля ви за помощ,защото нищо не ми е ясно от тук Извинявам се за латиницата.Отново Ви благодаря

[Реклама]

[Vladi_mnt]

човече, преди да ти я напиша, искам от теб да си промениш скапаната латиница... По д*волите, човек, ти си БЪЛГАРИН, ПИШИ НА БЪЛГАРСКИ, БЪДИ БЪЛГАРИН!!!

[ibo9321]

Извинявай за латиницата, Vladi_mnt

[ibo9321]

Моля Ви за помощ!!!Не искам 2 по информатика...помогнете ми

[Vladi_mnt]

program Zad;
Uses Crt;
var a,b,max: Integer;
begin
ClrScr;
write('a='); readln(a);
write('b='); readln(b);
If (a>=b) Then max:=a
Else max:=b;
If ((max mod 2=0) and (max mod 3=0)) Then writeln('Числото се дели на 6')
Else writeln('Числото НЕ се дели на 6')
end.

Извинявам се за закъснението, но трябваше да си платя И-нета, но го бях закършил много яко финансово..

[ibo9321]

Благодаря ти много да си жив и здрав.Длъжник съм ти ако не беше ти 100% двойка,ти си номер 1 Vladi_mnt.Да бяха всички като теб приятелю!!!.

[ibo9321]

Опа сори за темата и аз един тъпчо вместо отговор написах нова тема.Извинявам се

[ibo9321]

Приятел защо ми излиза "Ерор 200 и пише Division by zero",знам че стана банално,но моля те да видиш някакъв начин да го оправиш.Благодаря ти предварително пък ако не можеш,здраве аз съм ти задължен много за помощта,която ми указа.

[Vladi_mnt]

[ibo9321]

Вече всичко е ОК.Отново ти благодаря много.

[Vladi_mnt]

Моля, моля. Заповядай пак ( но за репутацийка, нали зн )

[Vladi_mnt]

И, все пак, кажи ми каква версия паскал или Делфи ползваш... Ако желаеш, де....

[Реклама]

[ibo9321]

Разбира се,че ще ти кажа коя версия ползвам''Turbo Paskal 7.0''.Човече,наистина ако бяха всички като теб света щеше да е мн. по-спокоен,а не в такава анархия.Благодаря ти много ти си моят идол на тема информатика.До нови срещи приятел

[Vladi_mnt]

До нови срещи и на теб, приятел