logo
Войти Регистрация Спроси ai-bota


Valerivaleeva
07.08.2020 04:18

Составить программу которая возводит в квадрат остаток от целочисленного деления числа а на 15 и выводит результат

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
poli36914
poli36914
12.03.2022 05:02
1.переведите в десятичную систему следующие двоичные числа: 101, 11101, 101010, 100011, 10110111011. 2. переведите в двоичную систему счисления следующие десятичные числа:...
Vitoriofedorov
Vitoriofedorov
12.03.2022 05:02
Составить рассказ , про лошадь с ноутбуком и книгой....
daniildorunov
daniildorunov
03.06.2021 18:52
Задание 1 Напишите программу (файл user.py), которая запрашивала бы у пользователя: - его имя (например, Как Вас зовут? ) - возраст ( Сколько Вам лет? ) После этого выводила...
35глис
35глис
09.09.2021 20:27
1) Какой фактор жизнедеятельности является одним из ведущих в формировании «болезней цивилизации»? отдых двигательная активность сон питание 2)Какой вид кулинарной обработки...
00002017
00002017
20.02.2021 01:17
выполнить с объяснением (и желательно побыстрее):1. Для какого из данных слов истинно высказывание:НЕ (есть шипящие) И (оканчивается на гласную)?1) любовь 2) отвращение3)...
annelya009
annelya009
27.05.2023 02:38
ОЧЕНЬ ПО ИНФОРМАТИКЕ ТЕСТ, ПРОБЛЕМА ОГРОМНАЯ​...
alenalebedeva2
alenalebedeva2
22.01.2023 14:03
, приведите пример матрицы проблематики. Вопрос по системному анализу...
redckast
redckast
13.03.2023 05:50
Упр 202 .Написать заметку, посвященную теме Человек и природа ....
СашаБагнюк22
СашаБагнюк22
11.08.2022 20:08
4. Одна из цепочек ДНК имеет следующую последовательность нуклеотидов: ГАТ-ГАГ-ТГТ-ТГГ-ЦГТ Определите последовательность аминокислот в белке, если известно, что и-РНК синтезируется...
artemkovalev1
artemkovalev1
04.05.2022 20:14
Знайти не выконоючи побулову точки перетину з осями...
Ответ:
weranika20ozd22z
03.10.2020 04:27
Program Program1;
var 
A,B:Integer; 
C,D:Real;
Begin 
ReadLn(A); 
B:=A mod 15; 
C:=sqr(B); 
WriteLn(C);
End.
0,0(0 оценок)
Ответ:
Sunanam
03.10.2020 04:27
Var x:integer;
begin
  readln(x);
  writeln((x div 15)*(x div 15));
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота