Все категории

3 года назад

Расшифровать текст AlJBTUJCD0c=, где A=R, B=P, C=M, D=T

Знания

Информатика

1 ответ:

Kristina533 года назад

0 0

Base64: "FROMBLOG"
//////////////////////////////////

Читайте также

Паскаль. Сделать из функции (Поиск НОД у 5 чисел) - процедуру. var a,b,m1,m2,m3,ITOG,c,d,e:integer; Function nod (x,y:integer)

kira vik

Var a,b,c,d,e,m1,m2,m3,ITOG:integer;
Procedure nod(x,y:integer;var n:integer);
Begin
If x=y then n:=x
else
if x>y then NOD(x-y, y, n)
Else NOD(x, y-x, n);
end;
begin
read (a,b,c,d,e);
nod(a,b,m1);
nod(c,d,m2);
nod(m1,m2,m3);
nod(m3,e,ITOG);
writeln (ITOG);
end.

Пример:
90 135 45 315 75
15

0 0

4 года назад

Дано натуральное число n (n>9). Найти число сотен в нем.(Паскаль)

Водород

Program test;
var n: integer; 
begin 
writeln(' n = '); read(n); 
writeln(' сотен = ' , n div 100); 
end;

0 0

4 года назад

Составить программу, определяющую, все целые числа из промежутка от 300 до 600, у которых сумма делителей кратна 10. Язык: с++;

radeons

#include <iostream>

using namespace std;

int main () {

int digit = 300;

do {

int sum = 0;

int teiler = 1;

while (teiler <= digit)

{

if (digit % teiler == 0)

sum+=teiler;

teiler++;

}

if(sum % 10 == 0)

{

cout << digit << endl;

}

digit++;

} while (digit <= 600);

return 0;

}

0 0

4 года назад

Помогите пожалуйста! Напишите программу, которая находит в массиве номера элементов, равных минимальному на PYTHON Входные данны

Trip [6]

На скриншоте
=============

0 0

4 года назад

1обязательным условием при передаче информации является а)важность передаваемой информации б)понятность передаваемой информаци

Безликий [3]

1) Г
2)в
3)г
4) в

..............................................

0 0

3 года назад