Написати код програми яка в залежності від введеної дати (наприклад 15.04.2021) вкаже, скільки днів залишилося до кінця року. Написати код програми яка від поточної дати (15.04.2021) вкаже, скільки днів залишилося до вашого дня народження.
День програміста відзначають у 256 день року. Написати програму яка визначить повну дату цього свята.

👇

Увидеть ответ

Открыть все ответы

Ответ:

Oremi

30.12.2021

Қауіпсіздік техникасының ережелерін төмендегі пункттерге бөлуге болады:

1. Жалпы

2. ДК - де жұмыс істеу алдында

3. Жұмыс істеу кезінде

4. Авариялық жағдайларда

5. Жұмысты аяқтағанда

Жалпы қауіпсіздік талаптары:

1. Мұғалімнің рұқсатынсыз құрал - жабдықтарды орнынан қозғауға, сымдарға, розеткаларға, штепсельдің айырына, штекерге тиісуге тыйым салынады.

2. Мұғалімнің рұқсатынсыз сыныпқа кіруге және сыныптан шығуға болмайды.

3. Мұғалімнің рұқсатынсыз сыныпта жүруге болмайды.

4. ДК - де су киіммен және су қолмен жұмыс істеуге болмайды.

5. Корпусы мен сымдарының бүтіндігі бұзылған (ашық) ДК - де жұмыс істеуге тыйым салынады.

6. Үстелге, ДК - дің жанына сумка, портфель, кітап қоюға болмайды. Үстелде тек дәптер мен қалам ғана жатуы керек.

7. Пернетақтаның үстіне ештеңені қоюға болмайды.

8. Компьютер сыныбында жүгіруге, ойнауға, жолдастарыңның көңілін қажетсіз аударуға, бөгде жұмыстарды істеуге тыйым салынады.

4,8(47 оценок)

Ответ:

пипиша

30.12.2021

Var a,b,c,d,i,f,g,h,n:integer;
begin
writeln('введите число');
readln(a);
g:=0;
c:=0;
d:=0;
i:=0;
f:=0;
writeln('введите число для сравнения');
readln(h);
for b:=a downto 1 do begin
if a mod b = 0 then writeln('его делитель ==>',b);
if a mod b = 0 then c:=b+c;
if a mod b = 0 then if b mod 2 = 0 then d:=d+b;
if a mod b = 0 then if b mod 2 <> 0 then i:=i+1;
if a mod b = 0 then f:=f+1;
if a mod b = 0 then if b mod 2 = 0 then g:=g+1;i
f a mod b = 0 then if b>h then n:=n+1;
end;
writeln('сумма его делителей ==>',c);
writeln('сумма его чётных делителей ==>',d);
writeln('количество нечётных делителей ==>',i);
writeln('количество чётных делителей ==>',g);
writeln('количество делителей ==>',f);
writeln('количество делителей больших b ==>',n);
end.

4,4(96 оценок)

Это интересно:

Компьютеры-и-электроника

03.09.2021

11 способов, как экономить ресурсы в игре Clash of Clans...

Кулинария-и-гостеприимство

15.05.2021

Как заготовить розмарин: собираем и храним ароматные травы впрок...

Праздники-и-традиции

28.09.2020

8 советов о том, как купить подарки на Рождество, если у вас немного денег...

Компьютеры-и-электроника