baton197310
?>

Створіть новий файл Python та підключіть відповідний модуль. Створіть нове вікно світло червоного кольору із розмірами 600 на 700 пікселів із забороною змінювати розміри вікна. Створити текстове поле (всі атрибути встановити за власним бажанням), кнопку поруч із текстовим полем (текст "Ok", колір білий, шрифт "Саlibri 13"), та напис із початковим текстом «Ви нічого не ввели». Після натискання на кнопку текст напису повинен змінитися на введений користувачем.​

Информатика

Ответы

vik-2202
Вариант 1
var  str:string;
  A,B,i:integer;
 begin
   write('введите ваш текст');
   readln(str);
   for i:=1 to length(str) do begin
     if (str[i]='А')or (str[i]='а') then a:=a+1;
     if (str[i]='Б')or (str[i]='б') then B:=b+1;
   end;
   if (A+B)=0 then write('нет таких букв') else write ('A= ',A,' Б= ',b);
end.

вариант 3
var  str:string;
  A,B,i:integer;
 begin
   write('введите ваш текст');
   readln(str);
   i:=1;
   while i<=length(str) do begin
    if (str[i]='А')or (str[i]='а') then delete(str,i,1);
    i:=i+1;
    end;
   write(str);
      end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Створіть новий файл Python та підключіть відповідний модуль. Створіть нове вікно світло червоного кольору із розмірами 600 на 700 пікселів із забороною змінювати розміри вікна. Створити текстове поле (всі атрибути встановити за власним бажанням), кнопку поруч із текстовим полем (текст "Ok", колір білий, шрифт "Саlibri 13"), та напис із початковим текстом «Ви нічого не ввели». Після натискання на кнопку текст напису повинен змінитися на введений користувачем.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Sokolova-Shcherbakov
spadikov
Федор_Рауф1592
ninaandreeva3179
volodinnikolay19
metelkin7338
mdubov59
kartyshkinaaa
Vera_Shuklin
dyatchina63
delfinmos
Vyacheslavovich1431
kashihina
krasilnikov74
Olesyamilenina8