Помогите пожалуйста, очень нужно. Дано число n, вывести на экран обратное ему число, например дано число 987, вывести нужно 789, реальзовать эту задачу с помощью массива. Я никак не пойму как это сделать, я решила эту задачу так:
program task_5;
uses crt;
var i,j:integer; n:longint; k,m:string;
BEGIN clrscr;
write ('n=');
readln(n);
str(n,k);
str(n,m);
j:=length(k);
for i:=1 to j do begin
m[i]:=k[j];
j:=j-q;
end; writeln ('massiv: ', m);
readln END.
Только это нужно реализовать через массив. ПОЖАЛУЙСТА, НИПИШИТЕ ТЕКСТ ПРОГРАММЫ.
Миром правят числа и их соотношения...
|
|
|
|
|
Что значит через массив - число то одно. Поясните для чего массив. Вообще-то это делают так: формируют новую строку - пустую (присваивают s:=''). Число преобразуют в строку, а потом цикл убывающий от последнего к первому и поэлементно добавляют к s, то что считывается. Полученную строку опять в число преобразуют.
|
|
|
|
помогите решить задачу по прогромированию найти периметр равнобедренного треугольника если известна его боковая сторона и высота опущенная к основанию
№ 3 | Автор: stail |
2008-12-12, 10:51
--------->
|
|
|
|
Тебе нужна только одна формула для вычисления периметра. Пусть боковая сторона равна "а", а высота равна "h". Тогда третья сторона (основание) может быть вычислена по теореме пифагора
Вот твоя Програмка на Паскале.
==========================================
var A,H,P:real;
begin
write('A= ');read(A);
write('H= ');read(H);
P:=2*A+2*sqrt(A*A-H*H);
writeln('P=',P);
end.
|
|
|
|
ludi pomogite reshit6 zadachu ochen6 nado
Даны натуральное число n, символы s1,....,sn.Определить число вхождений в последовательность s1,...,sn группы букв:
aba  [color=yellow]
№ 5 | Автор: rocket |
2009-01-02, 17:16
--------->
|
|
|
№ 5 | Автор: rocket |
2009-01-02, 17:16
--------->
|
|
|
|
