Создайте проект в котором событие click для кнопки установит ее размеры 50 на 50 пикселей, установит коричневый цвет текста на кнопке и изменит текст на кнопке на мой проект а событие keypress переместит кнопку на 30 пикселей вправо и на 40 пикселей вниз.

!
(object pascal) lazarus

170

475

Посмотреть ответы 1

Ответы на вопрос:

nusuperirish

Информатика

4,4(7 оценок)

// pascalabc.net 3.1, сборка 1218 от 12.04.2016 var i,n,k: integer; s: string; begin write('введите натуральное число: '); read(n); k: =0; str(n,s); for i: =1 to length(s) do if pos(s[i],'2468')> 0 then inc(k); writeln('количество четных цифр равно ',k) end. тестовое решение: введите натуральное число: 3452234 количество четных цифр равно 4