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

Написать в паскаль abc 1) напишите программу, перемножающую целые числа без использования операции < < * > > . например, при умножении целых чисел n*m число m надо сложить само с собой n раз (m+m++m). 2) напишите программу возведения числа в целую степень. число и степень запрашивайте у пользователя.

👇
Ответ:
BackspaceAlt
BackspaceAlt
05.07.2022
Опишу только момент, в котором вся суть, т.е. без ввода данных и т.д.:
...
for i:=1 to (на сколько надо умножить) do
k:=k+a {k-итоговая сумма, перед циклом к=0, в конце к<>0; a-вводимое число}
...
таким же образом поступаем и с умножением
4,6(8 оценок)
Ответ:
GrebenukMerry
GrebenukMerry
05.07.2022
Uses crt;
var x,y,pr,i:integer;
begin
     pr:=0;
     write('1 множитель:'); readln(x);
     write('2 множитель:'); readln(y);
     for i:=1 to x do
         pr:=pr+y;
     writeln('произведение:',pr);
end.
---
uses crt;
var x,y,st,i:integer;
begin
     st:=1;
     write('число:'); readln(y);
     write('степень:'); readln(x);
     for i:=1 to x do
         st:=st*y;
     writeln('результат::',st);
end.
4,8(14 оценок)
Открыть все ответы
Ответ:
madina319
madina319
05.07.2022
1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.
4,6(27 оценок)
Ответ:
svetabruhan
svetabruhan
05.07.2022

Задание 1

Геродо́т Галикарна́сский — древнегреческий историк, по крылатому выражению Цицерона «отец истории» — автор первого сохранившегося значительного трактата «История», описывающего греко-персидские войны и обычаи многих современных ему народов. Труды Геродота имели огромное значение для античной культуры.

Аристо́тель — древнегреческий философ. Ученик Платона. С 343 года до н. э. — воспитатель Александра Македонского. В 335/4 годах до н. э. основал Ликей. Натуралист классического периода. Наиболее влиятельный из философов древности; основоположник формальной логики.

Пифагор Самосский — древнегреческий философ, математик и мистик, создатель религиозно-философской школы пифагорейцев. Античные биографии Пифагора содержат множество легенд. По наиболее распространённой версии Пифагор родился на острове Самос. В молодости много путешествовал и учился.

Задание 2

Культура Древней Греции — это совокупность достижений в области материальной культуры греческого рабовладельческого общества в период его образования, расцвета и упадка. Вершина её классического наследия относится ко времени Афинской демократии. В числе главных особенностей отмечают её глубоко общественный характер

Задание 3

Зевс – главное божество древнегреческой мифологии, царь всех других богов, олицетворение беспредельного неба, повелитель молний. В римской религии ему соответствовал Юпитер

Посейдон – бог морей, у древних греков – второе божество по значению после Зевса. Как олицетворение изменчивой и бурной водной стихии Посейдон был тесно связан с землетрясениями и вулканической деятельностью. В римской мифологии отождествлялся с Нептуном.

Аид – владыка мрачного подземного царства мёртвых, населённого бесплотными тенями умерших и ужасными существами-демонами. Аид (Гадес), Зевс и Посейдон составляли триаду самых могущественных богов Древней Эллады. В качестве повелителя глубин земли Аид имел отношение и к сельскохозяйственным культам, с которыми тесно связывалась его жена, Персефона. У римлян именовался Плутоном

Гера – сестра и жена Зевса, главная женская богиня греков. Покровительница брака и супружеской любви. Ревнивая Гера сурово карает за нарушение брачных уз. У римлян ей соответствовала Юнона.

Аполлон – первоначально бог солнечного света, чей культ затем получил более широкое значение и связь с идеями душевной чистоты, художественной красоты, врачебного целительства, воздаяния за грехи. Как покровитель творческой деятельности считается главой девяти муз, как целитель – отцом бога врачей Асклепия. Образ Аполлона у древних греков сложился под сильным влиянием восточных культов (малоазиатский бог Апелюн) и нёс в себе утончённые аристократические черты. Аполлон именовался ещё и Фебом. Под теми же именами он почитался и в Древнем Риме

Афина – богиня душевной гармонии и мудрости. Считалась изобретательницей и покровительницей большинства наук, искусств, духовных занятий, земледелия, ремёсел. С благословения Афины Паллады строятся города и идёт государственная жизнь. С функциями покровительства городам и государству тесно связан образ Афины как защитницы крепостных стен, воительницы, богини, которая при самом рождении вышла из головы своего отца, Зевса, вооружённой. У римлян Афине соответствовала богиня Минерва.

Гермес – древнейший догреческий бог дорог и полевых межей, всех границ, отделяющих одно от другого. Из-за своей исконной связи с дорогами Гермес позднее почитался как посланник богов с крыльями на пятках, покровитель путешествий, купцов и торговли. Его культ связывался также с представлениями об изворотливости, хитрости, тонкой умственной деятельности (искусном разграничении понятий), знании иностранных языков. У римлян – Меркурий, в честь которого названа одноименная планета.

Арес – дикий бог войны и битв. В Древнем Риме – Марс, по имени которого названа планета.

Афродита – древнегреческая богиня любви и красоты. Её тип очень близок к семитско-египетскому почитанию производительных сил природы в образе Астарты (Иштар) и Исиды. Известное сказание об Афродите и Адонисе навеяно древнейшими восточными мифами об Иштар и Таммузе, Исиде и Осирисе. У древних римлян отождествлялась с Венерой, в честь которой названа одноименная планета.

Вроде всё

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