М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
777777770
777777770
23.01.2021 15:23 •  Информатика

Разработать код на Python: Дано слово. Удалить из него все повторяющиеся буквы, оставив их первые вхождения, т. е. в слове должны остаться только различные буквы.

👇
Ответ:

"""Регистры учитываем, то есть, A и а - разные буквы"""

word = input("Введите слово: ")

print(''.join(sorted(set(word), key=word.index)))

4,4(25 оценок)
Открыть все ответы
Ответ:
арсен157
арсен157
23.01.2021

Код на Java

import java.util.Random;

import java.util.Scanner;

public class Main {

   public static void main(String[] args) {

       Scanner in = new Scanner(System.in);

    int A[] = new int[20]; //создание массива

    for(int i=0;i<A.length;i++) {

        A[i]=in.nextInt();    //заполнение массива

       }

    int sum = 0;

    Random r = new Random(); //обьект класса Random

    for(int i=0;i<5;i++) {

        sum=sum+A[r.nextInt(20)]; //r.nextInt(20) - генерирует число от 0 до 20

       }

    System.out.println(sum);

   }

}

4,6(68 оценок)
Ответ:
ekaterinaf79
ekaterinaf79
23.01.2021

Если не разделять понятия неотрицательных и положительных, то этот код:

Var

A,B,C,P,O:integer;

Begin

P:=0;

O:=0;

WriteLn('Введи три числа');

ReadLn(A,B,C);

if A>=0 then P:=P+1

else O:=O+1;

if B>=0 then P:=P+1

else O:=O+1;

if C>=0 then P:=P+1

else O:=O+1;

WriteLn('Положительных чисел ',P);

WriteLn('Отрицательных чисел ',O)

End.

Если разделять, то этот:

Var A,B,C,P,O,N:integer;

Begin

P:=0;

O:=0;

N:=0;

WriteLn('Введи три числа');

ReadLn(A,B,C);

if A=0 then N:=N+1

else

if A>0 then P:=P+1

else O:=O+1;

if B=0 then N:=N+1

else

if B>0 then P:=P+1

else O:=O+1;

if C=0 then N:=N+1

else

if C>0 then P:=P+1

else O:=O+1;

WriteLn('Положительных чисел ',P);

WriteLn('Отрицательных чисел ',O);

WriteLn('Нулей ',N)

End.

Объяснение:

4,8(18 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ