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

1)Сколько строк напечатает программа:

var

i,j:integer;

begin

FOR i:=5 DOWNTO 1 DO

FOR j:=7 TO 10 DO

writeln('Мое ДЗ.');

end.
2)Каким будет результат выполнения программы?

var
i:integer;
begin
i:=1;
while i<=10 do begin
i:=i+10 mod 3; end;
writeln('i= ',i);
end.
3)Чему будет равно значение переменной X после выполнения данной последовательности команд?

x:=0;
for i:=1 to 10 do
for j:=1 to 20 do
x:=x+2;
можете написать только ответ без решения

👇
Ответ:
Moldir94
Moldir94
21.02.2020

1) 20 строк

2) i= 11

3) 400

4,4(87 оценок)
Открыть все ответы
Ответ:
ivanovanadusa03
ivanovanadusa03
21.02.2020

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

namespace ConsoleApp

{

   class Program

   {

       static void Main(string[] args)

       {

           Console.Write("Введите четырехзначное число: ");

           int Chislo = int.Parse(Console.ReadLine());

           if (Chislo <= 9999 && Chislo>=1000)

           {

               int a, b, c, d;

               a = Chislo / 1000;

               b = (Chislo / 100)%10;

               c = (Chislo / 10)%10;

               d = Chislo % 10;

               if (a==b||a==c||a==d||b==c||b==d||c==d)

                 Console.WriteLine("Eсть одинаковые цифры в числе: " + Chislo);

               else

                   Console.WriteLine("В числе: " + Chislo + " нет одинаковых цифр!");  

           }

           else

               Console.WriteLine("Ошибка! Вы ввели не четырехзначное число!");    

       }

   }

}

Объяснение: Супер стремный вариант, но он работает.


Дано четырехзначное число. Определите, есть ли одинаковые цифры в нем C#
4,4(59 оценок)
Ответ:
Андрей0126
Андрей0126
21.02.2020
О четности или нечетности вещественного числа можно говорить лишь если оно не имеет дробной части. В этом случае оно приводится к целому числу. Я не знаю, зачем дано абсолютно глупое требование не использовать условный оператор, но выполнить его можно. Надо умножать число на абсолютную величину остатка от его деления на 2. Если число четное, остаток будет нулевым, нечетное - единичным. Поэтому результатом умножения будет или само нечетное число, или ноль. И можно все подряд складывать.

CLS
DIM n AS INTEGER
INPUT "n=", n
DIM i AS INTEGER, k AS INTEGER, x AS SINGLE, s AS SINGLE, i AS INTEGER
s = 0
FOR i = 1 TO n
   INPUT "->", x
   s = s + x * (ABS(INT(x)) MOD 2)
NEXT i
PRINT "s = ", s

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