Не используя функцию возведения в квадрат напишите на языке паскаль наиболее короткие алгоритмы вычисления: a) y=x в десятой b) y= x в пятнадцатой постараться использовать минимальное количество дополнительных переменных.
rrrrrrrrtttttttttyyy
3
18.05.2019 07:50
0
Другие вопросы по теме Информатика
КилоЛеденцов
22.08.2019 16:20
Wikwsejjj
30.05.2019 01:00
ARTiStlll
18.05.2019 02:18
лисичка009
15.05.2020 20:43
Jezzyfeed1
05.10.2019 06:10
alkasalamatina
05.10.2019 06:10
gireeva00
05.10.2019 06:10
kobelevmiklip08h5g
05.10.2019 06:10
Популярные вопросы
- Світловий промінь падає під кутом 60° на границю розділу повітря-вода. Визначити...
2 - Знайдіть sin a, tg a, ctga, якщо cosa =1/4...
1 - Асқар Алтайдын прописка әнгімесінін бссты кейіпкер кім?...
1 - Выход Энергии при Делении 1 моля 239 Pu...
2 - Визначте формулу простої речовини а) H2 б) HCL в)H г)K2O...
2 - там фотоне проходила сама эту тему, тк была на соревнованиях...
1 - Тому кто ответит: Подписка,❤,5☆ >...
3 - Середнє арифметичне трьох чисел — 25. Знайди ці числа, якщо перше число в...
2 - Розв яжіть систему рівнянь {3(х+у)+(х-у)=20{5(х+у)-(х-у)=28 ...
2 - какие чувства испытывал герой к учителю после случившегося ? ответить на вопросы...
3
Program p2;//для 10-ой
Var y,x:integer;
i:byte;
Begin
Readln(x);//введите Х
For i:=1 to 10 do
Y:=y*x;
Writeln(Y);
End.
Program p2;//для 15-ой
Var y,x:integer;
i:byte;
Begin
Readln(x);//введите Х
For i:=1 to 15 do
Y:=y*x;
Writeln(Y);
End.