function fibonacchi(x:integer):integer;
// функция возвращает порядковый номер введённого числа
// ряда Фибоначчи. Если число не является элементом
// из данного ряда, то функция возвращает -1
var counter:integer = 2;
s1,s2,s3:integer;
begin
s1 := 0;
s2 := 1;
s3 := 0;
if x = 0 then fibonacchi:=1
else if x = 1 then fibonacchi:=2
else begin
while s3 < x do begin
s3 := s1 + s2;
s1 := s2;
s2 := s3;
inc(counter);
end;
if s3 = x then fibonacchi:=counter
else fibonacchi:=-1;
write(fibonacchi(13));
end.
2-ое задание:
#include <iostream>
int main() {
int number;
std::cout << "Введите число: " << std::endl;
std::cin >> number;
if (number > 0)
std::cout << "Положительное" <<std::endl;
else if (number < 0)
std::cout << "Отрицательное" << std::endl;
else
std::cout << "Ноль" << std::endl;
return 0;
}
1-ое задание:
double dollars, grivnas;
std::cout << "Введите кол-во долларов: " << std::endl;
std::cin >> dollars;
grivnas = dollars * 28.3;
std::cout << dollars << " доллар-(а, ов) в гривнах " << grivnas << std::endl;
Объяснение:
function fibonacchi(x:integer):integer;
// функция возвращает порядковый номер введённого числа
// ряда Фибоначчи. Если число не является элементом
// из данного ряда, то функция возвращает -1
var counter:integer = 2;
s1,s2,s3:integer;
begin
s1 := 0;
s2 := 1;
s3 := 0;
if x = 0 then fibonacchi:=1
else if x = 1 then fibonacchi:=2
else begin
while s3 < x do begin
s3 := s1 + s2;
s1 := s2;
s2 := s3;
inc(counter);
end;
if s3 = x then fibonacchi:=counter
else fibonacchi:=-1;
end;
end;
begin
write(fibonacchi(13));
end.
2-ое задание:
#include <iostream>
int main() {
int number;
std::cout << "Введите число: " << std::endl;
std::cin >> number;
if (number > 0)
std::cout << "Положительное" <<std::endl;
else if (number < 0)
std::cout << "Отрицательное" << std::endl;
else
std::cout << "Ноль" << std::endl;
return 0;
}
1-ое задание:
#include <iostream>
int main() {
double dollars, grivnas;
std::cout << "Введите кол-во долларов: " << std::endl;
std::cin >> dollars;
grivnas = dollars * 28.3;
std::cout << dollars << " доллар-(а, ов) в гривнах " << grivnas << std::endl;
return 0;
}
Объяснение: