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

Напишите программу, которая в последовательности натуральных чисел отделяет сумму чисел, оканчивающихся на 4. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчиваюшееся на 4. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число - сумму чисел, оканчивающихся на 4. Программа должна быть на паскале! Очень

👇
Ответ:
45667889
45667889
06.03.2021

var n,i,a,min: integer;

begin

readln(n);

min := 30001;

for i := 1 to n do

begin

readln(a);

if (a mod 10 = 4) and (a < min)

then min := a;

end;

writeln(min)

end.

4,8(86 оценок)
Открыть все ответы
Ответ:
julealeo
julealeo
06.03.2021
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
    setlocale(LC_ALL, "Russian");
    double x,y,z;
    cout << "Введите 3 числа через пробел: ";
    cin >> x >> y >> z;
    if (x<0)
    {
       x=pow(x,2);
    }
    else if (x>0)
    {
        x=pow(x,3);
    }
    if (y<0)
    {
       y=pow(y,2);
    }
    else if (y>0)
    {
        y=pow(y,3);
    }
    if (z<0)
    {
       z=pow(z,2);
    }
    else if (z>0)
    {
        z=pow(z,3);
    }
    cout << "Вывод: " << x << " " << y << " " << z << endl;
    return 0;
}
4,7(65 оценок)
Ответ:
yana221002
yana221002
06.03.2021

C самого детства-я считал, что в вычислительных машинах таилось нечто особенное, непонятное многим людям. В возрасте 6 лет я точно определился-компьютеры-моя любовь. Достаточно много времени с того момента, и я уже во многом разбираюсь, но до сих пор точно не определился, на какую специализацию пойти в будущем, ведь их так много! Информационная безопастность, прикладная информатика, программирование автоматизированных систем, web программирование, специалицазии на определенных языках программирования...-у меня разбегались глаза. Впрочем я и сегодня, занимаясь письмом этого сочинения до сих пор думаю о своем "Великом выборе".

Однако одно я могу заявить точно, с настоящей гордостью-"Я люблю компьютеры и хочу связать с ними свою жизнь!"

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