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

Даны три числа. выбрать те из них, которые принадлежат заданному отрезку [e, f ]. (ветвление на паскале с блок-схемой)

👇
Ответ:
сехун2
сехун2
24.11.2021
Программа написана и протестирована на языке PascalABC.NETvar    A, B, C: real;    e, f: real;begin    Readln(A, B, C);    Readln(e, f);        if (A >= e) and (A <= f) then Writeln(A);    if (B >= e) and (B <= f) then Writeln(B);    if (C >= e) and (C <= f) then Writeln(C);end.

Для увеличения картинки нажмите на лупу (расположена на фотографии) либо откройте фотографию в новой вкладке.


Даны три числа. выбрать те из них, которые принадлежат заданному отрезку [e, f ]. (ветвление на паск
4,7(93 оценок)
Открыть все ответы
Ответ:
ВладИК08123
ВладИК08123
24.11.2021
Var a,max,sum:integer;
    arr:array [0..2015] of integer;
    begin
randomize;
max:=-500;
sum:=0;
for a:=0 to 2015 do begin
arr[a]:=random(1001)-500;
if max<arr[a] then max:=arr[a];
end;
write('максимальный элемент массива ==> ',max);
writeln();

if max mod 2 = 1 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =1 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;

sum:=0;
if max mod 2 = 0 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =0 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;

end.
4,4(28 оценок)
Ответ:
MaryWintlstone
MaryWintlstone
24.11.2021

#include <iostream> // iostream

int main() { // int main

int N; // N

int M; // M

int sum = 0; // сумма чисел хэмминга от n до m

std::cout << "N: "; // запрашиваем N

std::cin >> N;

std::cout << "M: "; // запрашиваем M

std::cin >> M;  

int *hemming = new int[M - N + 1]; // массив с числами хемминга

int counter = 0; // размер массива

for (int i = N; i <= M; ++i) { // записываем числа в массим хемминга

 if (i % 2 == 0 || i % 3 == 0 || i % 5 == 0) { // если остаток от деления

  std::cout << i << " "; // на 2 или 3 или 5 равен нулю

  hemming[counter] = i; // и выводим.  

  sum += hemming[counter]; // прибавляем к сумме числа

  ++counter; // увеличиваем счётчик

 }

}

std::cout << std::endl << sum; // выводим сумму

}

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