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

Даны n натуральных чисел .определить и вывести количество членов последовательности кратных 3 и не кратных 5

👇
Ответ:
blackrabbit3
blackrabbit3
18.08.2020
{даны n натуральных чисел a1...a2...an.Определить и вывести количество членов последовательностикратных 3 и не кратных 5}
program zadacha;
vara: array[1..255] of byte;i,n,k: integer;
beginwrite('введите n от 1 до 100 - количество чисел ');read(n);for i:=1 to n do begina[i]:=random(255);write(a[i]:6);end;
k:=0;writeln();for i:=1 to n do begin    if (a[i] mod 3 = 0) and (a[i] mod 5 <> 0) then   begin k:=k+1;   write(a[i]:6);   end;end;writeln();writeln('в массиве ', k, ' элементов, кратных 3 и не кратных 5');end.
Даны n натуральных чисел .определить и вывести количество членов последовательности кратных 3 и не к
4,7(73 оценок)
Открыть все ответы
Ответ:
Uqqt
Uqqt
18.08.2020

Писать код можно в любой среде разработки: SharpDevelop, Microsoft Visual Studio, и другие - от них ничего не зависит для новичка.

Если Вы вообще ни разу не писали на C#, имеет смысл почитать какие-нибудь книги или онлайн учебники. Для Вашей задачи будет достаточно хотя бы узнать как писать программу, выводящую "Hello World" на экран и узнать о базовых типах переменных.

Приведу пример программы "Hello World":

using System;

class Program

{

   static void Main()

   {

       Console.WriteLine("Hello World");

   }

}

В этой программе новичку стоит только понимать, что программа выполняется внутри фигурных скобок, метода Main.

Дальше узнайте, что для хранения вещественных чисел используется тип переменных double.

А потом наберите в интернете "как округлять double до нужного числа знаков после запятой c#" или типа того.

В общем, когда Вам сказали найти ответ в интернете, имелось ввиду в поисковике, а не задавать вопрос на форуме.

4,4(84 оценок)
Ответ:
andryushaivcheoo
andryushaivcheoo
18.08.2020

uses crt;

var n,m,i,p:longint;

   s,k:byte;

begin

clrscr;

repeat

write('Введите натуральное число N=');

readln(n);

until n>0;

m:=n;

s:=0;

while m>0 do

begin

 s:=s+m mod 10;

 m:=m div 10;

end;

writeln('Числа от 1 до ',n-1,', у которых произведение цифр=',s);

k:=0;

for i:=1 to n-1 do

begin

 m:=i;

 p:=1;

 while m>0 do

  begin

   p:=p*(m mod 10);

   m:=m div 10;

  end;

 if p=s then

  begin

   k:=1;

   write(i,' ');

  end;

end;

if k=0 then write('Таких чисел нет');

readln

end.

Объяснение:

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