Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Anabella98
21.03.2022 14:24 •
Информатика
Записать программу для нахождения квадрата числа,если оно положительно
Ответ:
fdffxdf
04.10.2020 22:32
#include <iostream>
using namespace std;
int SqrPos(int n);
int main() {
cout << "n=";
int n; cin >> n;
cout << "n^2=" << SqrPos(n) << '\n';
return 0;
}
int SqrPos(int n) {
return (n > 0 ? n * n : 0);
}
0,0
(0 оценок)
Ответ:
122344566
04.10.2020 22:32
// PascalABC.NET 3.2, сборка 1356
begin
var n := ReadInteger('Введите число:');
if n > 0 then n *= n else n := 0;
Write('ответ: ', n);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Vita0814
29.03.2021 11:34
Некоторый алгоритм из одной цепочки символов получает новую цепочку следующим образом. сначала вычисляется длина исходной цепочки символов; если она нечётна, то дублируется...
CoolCaroot
09.07.2021 09:49
Напишите программу, которая вводит из файла весовую матрицу графа и строит для него минимальное остовное дерево.паскаль....
denus16
09.07.2021 09:49
Вмассиве 20 целых элементов заданных с клавиатуры найти сумму элементов массива кратных семи и оканчивающихся на цифру 1...
matveye234
17.04.2023 23:50
Сколько места надо выделить для хранения 15 страниц книги, если на каждой странице помещаются 33 строки по 63 символа в каждой?...
Mihael13
17.04.2023 23:50
Сообщение содержит 1200 бит информации сколько это сообщение будет весить в байтах...
sanyaleleckov
13.09.2020 17:47
Сумма чётных и произведение нечетных значений диапазона 100-1000...
Куска
13.09.2022 23:58
1.Запишите прямые коды десятичных чисел в однобайтовом формате: а) 64 б) 58 в) 72 г) -96 2. Запишите двоичные числа в дополнительном коде: а) 1010 б) -1001 в) -11 г) -11011 3....
Aruna30
12.09.2020 18:10
2.прослушайте текст в полном объёме. подготовьте подробный пересказ текста от лица учёного, который изучает чёрные дыры...
aleksandrbersh0
26.04.2022 22:22
20. Соотнесите текст и тип речи. ответ запишите в виде последовательности цифр без пробелов и без запятых. Точку в конце не ставьте. Пример: 123 А. Невидимые звезды снега теперь...
Obzzzi
09.01.2020 21:32
Если будет правильно сделаю лучшим ответом...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
using namespace std;
int SqrPos(int n);
int main() {
cout << "n=";
int n; cin >> n;
cout << "n^2=" << SqrPos(n) << '\n';
return 0;
}
int SqrPos(int n) {
return (n > 0 ? n * n : 0);
}
begin
var n := ReadInteger('Введите число:');
if n > 0 then n *= n else n := 0;
Write('ответ: ', n);
end.