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

Требуется написать программу, которая будет выполнять действия описанные ниже. желательно с комментированием.(visual studio, на c#) символы и их коды. формирование строк 1.22. дана строка, изображающая целое положительное число. вывести сумму цифр этого числа. 1.23. дана строка, изображающая арифметическое выражение вида «±±…±», где на месте знака операции «±» находится символ «+» или «–» (например, «4+7–2–8»). вывести значение данного выражения (целое число). 1.24. дана строка, изображающая двоичную запись целого положительного числа. вывести строку, изображающую десятичную запись этого же числа.

👇
Ответ:
sugurbaeva2002
sugurbaeva2002
07.06.2023

Переменную строки буду называть \texttt{str}.

1.22.

\texttt{Console.WriteLine(str.Select(t = int.Parse(t.ToString())).Sum());}

1.23.

\texttt{Console.WriteLine(Regex.Matches(str, @"[+-]*}\char`\\\texttt{d+")}\\\texttt{{ }{ }{ }{ }.Cast()}\\\texttt{{ }{ }{ }{ }.Select(t = t.Value.Replace("+", ""))}\\\texttt{{ }{ }{ }{ }.Select(int.Parse)}\\\texttt{{ }{ }{ }{ }.Sum());}

1.24.

\texttt{Console.WriteLine(Convert.ToInt32(str, 2).ToString());}

Потребуется использовать

\texttt{using System.Linq;}

\texttt{using System.Text.RegularExpressions;}

4,7(37 оценок)
Открыть все ответы
Ответ:
Dhnsmvrxjns
Dhnsmvrxjns
07.06.2023

ответ:

. в нужно вывести все составные числа из промежутка [2; n]. код программы:

program lab3;

var i,n,j,s,l: integer;

m: real;

begin

readln (n);

for i: =2 to n do

begin

s: =trunc (sqrt (i));

for l: =2 to s do

begin

m: = i mod l;

if m=0 then

write (' ',i);

end;

end;

end.

но проблема - как только s становится больше 2, составные числа начинают несколько раз повторятся, т.к., например 12 делится и на 2 и на 3. вопрос: как мне сделать выход из цикла после первого успешного деления?

var

i, n, j, s, l: integer;

m: real;

begin

readln(n);

for i : = 2 to n do

begin

s : = trunc(sqrt(i));

for l : = 2 to s do

begin

m : = i mod l;

if m = 0 then

begin

write(' ', i);

break;

4,5(23 оценок)
Ответ:
Umid3317
Umid3317
07.06.2023


program P1;
uses
crt;
var
A : array[1..3] of array [1..4] of longint;
i,j : integer;
begin

clrscr;

randomize;

writeln('Massiv : ');

for i := 1 to 3 do
begin

writeln('');

for j := 1 to 4 do
begin
A[i][j] := random(15)+random(5)-random(5);

write(A[i][j]:2,' ');
end;

 

end;

for i := 1 to 3 do
for j := 1 to 4 do
begin

if A[i][j] > 10 then
A[i][j] := i - j;

if (A[i][j] >= -5) and (A[i][j] <= 5) then
A[i][j] := sqr(i);

end;

writeln('');
writeln('');

writeln('Itogoviy massiv : ');


for i := 1 to 3 do
begin

writeln('');

for j := 1 to 4 do
begin

write(A[i][j]:2,' ');
end;

 

end;

 

readln;
readln;


end.

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