Есть ответ 👍

Разработать приложение, в котором запретить ввод с клавиатуры цифр и знаков препинания «.», «,», «:», «-» в поле Edit. При повторном вводе разрешенных символов выдавать сообщение «Символ уже введен!» На делфи.

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

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


Var i,a1,a2: integer; sum: longint; begin a1: =1; a2: =2; sum: =0; while (a1< 102) or (a2< 102) do begin sum: =sum+(a1*a2); a1: =a2+1; a2: =a1+1; end; writeln(sum); end.

Популярно: Информатика