nekrasovaolga27
?>

Впрограмме паскаль составить программу даны 2 числа . если числа больше 10, то уменьшить их в 10 раз , то есть оставить без изменений.

Информатика

Ответы

Khlustikova_Borisovna
1. Если каждое число рассматриваем как самостоятельное

var
  a,b:real;
begin
  Write('Введите два числа через пробел: ');
  Read(a,b);
  if a>10 then a:=a/10;
  if b>10 then b:=b/10;
  Writeln(a,' ',b)
end.

2. Если оба числа рассматриваем совместно

var
  a,b:real;
begin
  Write('Введите два числа через пробел: ');
  Read(a,b);
  if (a>10) and (b>10) then begin a:=a/10; b:=b/10 end;
  Writeln(a,' ',b)
end.
Глазкова633
Python

a = True

b = int(input())

while (a):

   if b == 1:

       print("Понедельник")

       a = False

   elif b == 2:

       print("Вторник")

       a = False

   elif b == 3:

       print("Среда")

       a = False

   elif b == 4:

       print("Четверг")

       a = False

   elif b == 5:

       print("Пятница")

       a = False

   elif b == 6:

       print("Суббота")

       a = False

   elif b == 7:

       print("Воскресенье")

       a = False

   else:

       print("Такого дня недели нет")

       b = int(input())

Осуществляется ввод, если b > не 1 - 7, то программа запрашивает число до тех пор, пока пользователь не введет нужное число.

SAMSCHOOL96

#include <iostream>

#include <vector>

using namespace std;

int main()

{

   int n;

   cin >> n;

   vector<int> v(n);

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

       cin >> v[i];

   }

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

       bool flag = false;

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

           if (v[i] == v[j]){

               flag = true;

           }

       }

       for (int j = i + 1; j < n; ++j){

           if (v[i] == v[j]){

               flag = true;

           }

       }

       if (flag == false){

           cout << v[i] << " ";

       }

   }

   return 0;

}

Объяснение:

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

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

Впрограмме паскаль составить программу даны 2 числа . если числа больше 10, то уменьшить их в 10 раз , то есть оставить без изменений.
Ваше имя (никнейм)*
Email*
Комментарий*

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

juliaipatova1739
Nikol27051986
askorikova
kmb1960679
syana80
tboychenko
llipskaya
NikolayGoncharov
zuelv
MikhailSvetlana
МуратМарина1140
grigoriev8
innavinogradova1385
art-03857
vsemvsego306