Регистрация
Даша12345н
13.01.2021 16:04
Информатика
Есть ответ 👍

Написать программу печати чисел фибоначчи от 1 до 1000, являющихся простыми числами, а также их порядковых номеров в ряду фибоначчи. с программой на паскале .

235
333
Посмотреть ответы 2

Ответы на вопрос:

kononova2007
kononova2007
4,8(49 оценок)
Var f1,f2,s: longint; k: integer; function prost(n: longint): boolean; var j,m: integer; begin m: =0; for j: =2 to trunc(sqrt(n)) do   if n mod j = 0 then inc(m); prost: =m=0; end; begin f1: =1; f2: =1; writeln('№ - число'); writeln('1 - ',f1); s: =1; k: =2; while s< =1000 do   begin   if prost(s) then writeln(k,' - ',s);   inc(k);   s: =f1+f2;   f1: =f2;   f2: =s;   end; end. результат: № - число 1 - 1 2 - 1 3 - 2 4 - 3 5 - 5 7 - 13 11 - 89 13 - 233
Alinakamisarova
Alinakamisarova
4,6(32 оценок)

#include <iostream>

using namespace std;

int main(int argc, char *argv[])

{

int a = 0;

cout << "Введите число: "<< endl;

cin >> a;

cout << "Квадрат данного числа: " << a * a << endl;

return 0;

}

Популярно: Информатика