Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
qweasdzxcrfvtgbmn
28.03.2020 09:21 •
Информатика
Составить программу для вычисления функции b=f(x,y,z), где z=φ(x,y).
Показать ответ
Ответ:
Tata123N
15.09.2022 17:56
Если считать отрицательные трехзначные, то сумма таких чисел в диапазонах от -999 до -100 и от 100 до 999 будет равна 0. Для только положительных:
//c циклом for
var s,i:integer;
begin
for i:=100 to 999 do
if i mod 77 = 0 then s:=s+i;
writeln('Сумма трехзначных кратных 77: ',s);
end.
Тестовое решение:
Сумма трехзначных кратных 77: 5929
// с циклом while
var s,i:integer;
begin
i:=100;
while i<=999 do begin
if i mod 77 = 0 then s:=s+i;
i:=i+1;
end;
writeln('Сумма трехзначных кратных 77: ',s);
end.
0,0
(0 оценок)
Ответ:
sulti1675gmailcom
07.02.2023 23:11
Вот на С++:
#include <iostream>
#include <sstream>
#include <fstream>
#include <string>
#include <vector>
#include <deque>
#include <queue>
#include <stack>
#include <set>
#include <map>
#include <algorithm>
#include <functional>
#include <cstring>
#include <utility>
#include <bitset>
#include <cmath>
#include <cstdlib>
#include <ctime>
#include <cstdio>
#include <climits>typedef unsigned long long ulol;
typedef long double ld;
typedef long long lol;
typedef long int li;#define mp make_pair
#define F first
#define S second
#define sqr(a) ( (a) * (a) )
#define pb push_back
#define INF 999999999
#define ret(a) cout << endl; system("pause"); return(a)
//#define ret(a) return(a)using namespace std;int main()
{
ld x;
cin >> x;
x = ( 8 / sqrt( x ) ) + sqrt(x);
cout << x;
ret(0);
}
0,0
(0 оценок)
Популярные вопросы: Информатика
fara2003onozog7w
22.03.2021 00:48
Ученик пишет диктант,переводит текс- какой это вид информационного процесса : хранение обработка передача?...
RoadGoodGame
29.04.2021 06:05
- Уровень Знание и понимание 1. Для чего нужны единицы измерения информации? ? 2. Что принято за единицу измерения количества информации? 3. Что такое байт, килобайт, мегабайт и...
Qwerty098765432111
09.06.2023 02:12
Какого информационного процесса не существует? хранение обработка получение использование...
serovv751
01.03.2021 15:09
Укажи, какой операции с файлом не хватает, и выбери правильное сравнение с библиотекой. Работая с файлами мы можем выполнять такие операции, как модификация, удаление, перемещение...
лариска6
21.03.2022 10:02
ЭТО СОР, КТО ОТВЕТИТ 2. Прочитайте ситуации. Определите, о каких функциях операционной системы идет речь. 1) a) При сохранении документа в текстовом редакторе на экране появляется...
нюра42
10.12.2020 16:16
Как можно скорее и подробнее, решите заранее...
DarkWolf100
31.12.2021 11:59
очень Нужно заполнить таблицу. ( )...
msimaratp08h7f
07.08.2021 02:47
В прямоугольном треугольнике cosα = Вычислите sin α , tg α;3 10...
mashabest19861
12.11.2021 07:16
Як називаюті коло и частину площі яку воно обмежує...
vasiliybondaroxq3j4
07.01.2022 10:05
Мәтінді оқыңдар, тақырыбы, құрылымы және тілдік ерекшелігін 3 тапсырма мәтінімен салыстырыңдар...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
//c циклом for
var s,i:integer;
begin
for i:=100 to 999 do
if i mod 77 = 0 then s:=s+i;
writeln('Сумма трехзначных кратных 77: ',s);
end.
Тестовое решение:
Сумма трехзначных кратных 77: 5929
// с циклом while
var s,i:integer;
begin
i:=100;
while i<=999 do begin
if i mod 77 = 0 then s:=s+i;
i:=i+1;
end;
writeln('Сумма трехзначных кратных 77: ',s);
end.
#include <iostream>
#include <sstream>
#include <fstream>
#include <string>
#include <vector>
#include <deque>
#include <queue>
#include <stack>
#include <set>
#include <map>
#include <algorithm>
#include <functional>
#include <cstring>
#include <utility>
#include <bitset>
#include <cmath>
#include <cstdlib>
#include <ctime>
#include <cstdio>
#include <climits>typedef unsigned long long ulol;
typedef long double ld;
typedef long long lol;
typedef long int li;#define mp make_pair
#define F first
#define S second
#define sqr(a) ( (a) * (a) )
#define pb push_back
#define INF 999999999
#define ret(a) cout << endl; system("pause"); return(a)
//#define ret(a) return(a)using namespace std;int main()
{
ld x;
cin >> x;
x = ( 8 / sqrt( x ) ) + sqrt(x);
cout << x;
ret(0);
}