Вывести на экран все двузначные числа, которые кратны 3 и не кратны 5
Вывести на экран все двузначные числа которые в сумме своих цифр дают 15

Помогите, пжлст.

Забыл сказать про язык Кумир..

1.var i:integer;beginfor i:=10 to 99 do if (i mod 3=0)and(i mod 5<>0)  then write(i,' ');end.Результат:12 18 21 24 27 33 36 39 42 48 51 54 57 63 66 69 72 78 81 84 87 93 96 992.var i:integer;beginfor i:=10 to 99 do if i div 10 + i mod 10 = 15  then write(i,' ');end.Результат:69 78 87 96