Сколько существует трехзначных чисел без повторяющихся цифр?

Знания

Информатика

1 ответ:

серик мизанов4 года назад

0 0

Ответ: 648.
Нот код решения этой задачи на паскале!

Uses CRT;var a,b,c,d, i, n : integer;beginclrscr;n:=0; for i:= 100 to 1000 do begin a:= i div 100; b:= i div 10; b:= b mod 10; c:= i mod 10; if (a = b) or (b = c) or (a = c) then else begin n:= n + 1; end; end; writeln (n);end.

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

СРОЧНО! 15 б Не откуда не копировать пж Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного нат

ОльгаМосква24

Ответ:

Python:

n = int(input())

s = 0

for i in range(1, n+1):

s += n

print(s)

C++:

#include <iostream>

using namespace std;

int main(){

int n, s = 0;

cin >> n;

for(int i = 1; i <= n; i++) s += n;

cout << s;

}

0 0

3 года назад

Какое знаменательное событие произошло 12 апреля 1979 года

-Graf-

1979 (одна тысяча девятьсот семьдесят девятый) год — невисокосный год, начинающийся в понедельник по григорианскому календарю. Это 1979 год нашей эры, 979 год 2 тысячелетия, 79 год XX века, 9 год 8-го десятилетия XX века, 10 год 1970-х годов.

Организацией объединённых наций данный год был определён как Всемирный год ребёнка.

0 0

4 года назад

Помогите создать сайт (Лёгкий, в HTML) информатика 8 класс

megobetvk [4.3K]

<!DOCTYPE html>
<html>
<head>
<meta charset="UTF-8">
<title>Почему так важно изучать информатику</title>
</head>
<body>
<font color=black>
<h3 color=white><p><strong>Зачем я изучаю информатику?</strong></p></h3> <br>
<h4>В наше время это, наверно, самый главный предмет, так как сейчас все только держится на коммуникационных технологиях. Чтобы попасть на хорошо оплачиваемую работу надо иметь опыт «общения» с компьютером. Я думаю, что без этого ни как, в данный момент даже дедушки и бабушки учатся работе с компьютером. Это очень важно учить и понимать информатику и новую технику.</h4>
<br>
<h4 align=right><strong>Вейхнер Эвелина, 7 А класс</strong></h4>
<hr></hr>
<br>
<h4>Я думаю, что это правильно, что в нашей школе изучают предмет «Информатика». Потому что компьютеры стали важной частью человечества. Если технологии станут быстрее развиваться, то люди поймут, что без компьютера не обойтись. Поэтому надо учить информатику.</h4>
<br>
<h4 align=right><strong>Малахов Антон, 7 Б класс</strong></h4>
<hr></hr>
<br>
<h4>В век высоких технологий, когда в каждом доме присутствует компьютер, человек должен знать, как с ним работать. Для изучения и практического применения и нужен предмет информатика. Её преподают в школах, ВУЗах, люди ходят заниматься в школы информатики. Сначала все кажется очень сложным, но проходит время и человека затягивает интерес. Он не понимает, как проснуться утром и не сесть за компьютер. Но это не очень хорошо. Не нужно сидеть много времени за компьютером, но и не нужно ограждать себя от сегодняшнего дня.</h4>
<br>
<h4 align=right><strong>Штанг Софья, 8 класс</strong></h4>
</body>
</html>

0 0

4 года назад

Вычислить сумму квадратов трех переменных, введенных с клавиатуры. Выполнить в паскале и результат записывался в отдельный фал

Elfio

<u>// PascalABC.NET 3.3, сборка 1576 от 16.11.2017</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>

begin
var (a,b,c):=ReadReal3;
WriteAllText('out.txt',(a*a+b*b+c*c).ToString)
end.

0 0

4 года назад

Помогите создать схему данных бд «Наличие запасных частей к автомобилям» с ключами, пожалуйста. Наименование детали Марка автомо

Arriel [83]

Схема БД во вложении. ключевые поля выделены, как обычно, жирным шрифтом.

0 0

3 года назад