program DecToBinCount;
uses
SysUtils, StrUtils;
function DecToBin (m: Integer): string;
var
r: Integer;
s: string;
begin
while (m > 0) do Begin
r := m mod 2;
m := m div 2;
s := IntToStr (r) + s;
end;
Result := s;
end;
var
m, n, x, i, c: Integer;
s: string;
begin
Write ('Введите M, N, X: ');
ReadLn (m, n, x);
WriteLn;
c := 0;
for i := m to n do begin
s := DecToBin (i);
if RightStr (s, x) = StringOfChar ('0', x) then begin
WriteLn (s, ' '); // для проверки. после тестирования закомментарить
Inc (c);
end;
end;
WriteLn (c);
ReadLn;
end.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
#include <stdio.h>
#include <math.h>
#include <string.h>
#include <iostream>
int main(void) {
struct NOTE {
char name[100];
char family[100];
int tele[15];
};
struct NOTE note[5];
int i;
for(i=0;i<5;i++) {
printf("note %d:\n",i);
printf("name?: "); scanf("%s",¬e[i].name);
printf("family?: "); scanf("%s",¬e[i].family);
printf("telephone?: "); scanf("%d",¬e[i].tele);
}
int z[15];
printf("telephone: ");scanf("%d",z[]);
for(i=0;i<5;i++)
if (strcmp(note[i].tele,z)==0){ //<ТУТ СЦУКА РУГАЕТСЯ,НЕ ПОЙМУ ПОЧЕМУ ХЛП
printf("name: %s\n family %s\n telephone %d\n",note[i].name,note[i].family,note[i].tele);
}
char t[40];
printf("name: "); scanf("%s",t);
for(i=0;i<5;i++)
if (strcmp(note[i].name,t)==0){
printf("name: %s\n family %s\n telephone %d\n",note[i].name,note[i].family,note[i].tele);
}
return 0;
}
Объяснение:
Поделитесь своими знаниями, ответьте на вопрос:
А1)Что такое файл? * 1)программа (программы), с которых на компьютере выполняются конкретные задания 2)любой материальный объект, используемый для хранения на нем информации 3)система обмена сообщениями 4)информация, хранящаяся во внешней памяти компьютера и обозначенная именем А2)Для чего используется клавиша Tab (Tabulation) компьютерной клавиатуры? Выберите несколько вариантов ответа. 1)перемещение курсора на один экран вверх 2)переход по ссылкам на веб-странице 3)переход по каким-либо параметрам 4)служит для перевода курсора в текстовых документах на уровень одной табуляции (как правило, это 8 пробелов) А3)Расширение исполняемых файлов? * 1)avi 2)mp3 3)exe 4)com А4)Выберите правильный порядок отправления электронного письма с вложением папки. * 1-написать адрес получателя. 2-заархивировать папку. 3-отправить. 4-написать тему письмя. 5-прикрепить архив папки. .1, 5, 2, 4, 3 .2, 1, 4, 5, 3 .4, 3, 5, 2, 1 .3, 1, 4, 2, 5 А5)Выберете расширения аудио файлов * Выберите несколько вариантов ответа 1)wav 2)doc 3)mp3 4)mid А6)Укажите расширение файла Информатика.docx? * 1)нет расширения 2)Информатика.docx 3)docx 4)Информатика А7)С какой программы из пакета MS Office можно создавать текстовые документы? * 1)MS Access 2)MS Word 3)MS Visio 4)MS PowerPoint А8)Какой вид программы Калькулятор используется для перевода между сиcтемами счисления? * 1)Обычный 2)Инженерный 3)Программист 4)Статистика А9)Клавиша, фиксирующая смену регистра букв со строчных на прописные? * 1)Caps Lock 2)Space 3)Scrool Lock 4)Page Down А9)Какое действие нельзя выполнить с группой файлов? * 1)удалить 2)копировать 3)переместить 4)переименовать А10)Нажав на какую клавишу можно включить/выключить цифровую клавиатуру? * 1)Delete 2)Insert 3)Home 4)Num Losk А11)Операционной системой НЕ является: * 1)Linux 2)Android 3)Windows Mobile 4)Netscape Navigator А12)Выберете правильную последовательность добавления таблицы * 1-нажать ок 2-указать число строк и число столбцов 3-выберите пункт «Вставить таблицу...» 4-перейти во вкладку «Вставка» 5-вставить на иконку «Таблица» 2, 3, 1, 4, 5 4, 5, 3, 2, 1 1, 2, 3, 4, 5 5, 3, 4, 2, 1 А13)Когда нажата эта клавиша, вводимый пользователем текст, будет заменять уже напечатанное ранее? * 1)Tab 2)Insert 3)Backspace 4)Pause А14)Файл, сохраненный в версии MS Word 97 – 2003, открывается в любой из версий MS Word? * 1)Верно 2)Не верно А15)Нажав на какую клавишу можно сделать снимок экрана? * 1)Print Screen 2)Caps Lock 3)Esc 4)Scrool Lock А16)Графические файлы могут иметь расширения … * 1)bmp 2)com 3)doc 4)ехе 5)jpg 6)gif А17)Расширение видео файлов … * Выберите несколько верных ответов 1)png 2)mov 3)mp4 4)avi А18)Имя файла состоит из … * 1)любых символов 2)букв, цифр и специальных символов 3)имени и расширения 4)имени и математических символов А19)Какие действия можно выполнить с файлом? * 1)копировать 2)создать 3)начертить 4)переименовать
Объяснение:
А1)Что такое файл? *
1)программа (программы), с которых на компьютере выполняются конкретные задания
А2)Для чего используется клавиша Tab (Tabulation) компьютерной клавиатуры?
Выберите несколько вариантов ответа.
3)переход по каким-либо параметрам
А3)Расширение исполняемых файлов? *
1)avi
2)mp3
3)exe
А4)Выберите правильный порядок отправления электронного письма с вложением папки. *
1-написать адрес получателя.
2-заархивировать папку.
3-отправить.
4-написать тему письмя.
5-прикрепить архив папки.
.2, 1, 4, 5, 3
А5)Выберете расширения аудио файлов *
Выберите несколько вариантов ответа
1)wav
3)mp3
4)mid
А6)Укажите расширение файла Информатика.docx? *
2)Информатика.docx
А7)С какой программы из пакета MS Office можно создавать текстовые документы? *
2)MS Word
А8)Какой вид программы Калькулятор используется для перевода между сиcтемами счисления? *
3)Программист
А9)Клавиша, фиксирующая смену регистра букв со строчных на прописные? *
1)Caps Lock
А9)Какое действие нельзя выполнить с группой файлов? *
4)переименовать
А10)Нажав на какую клавишу можно включить/выключить цифровую клавиатуру? *
4)Num Losk
А11)Операционной системой НЕ является: *
1)Linux
2)Android
3)Windows Mobile
А12)Выберете правильную последовательность добавления таблицы *
1-нажать ок
2-указать число строк и число столбцов
3-выберите пункт «Вставить таблицу...»
4-перейти во вкладку «Вставка»
5-вставить на иконку «Таблица»
4, 5, 3, 2, 1
А13)Когда нажата эта клавиша, вводимый пользователем текст, будет заменять уже напечатанное ранее? *
1)Tab
А14)Файл, сохраненный в версии MS Word 97 – 2003, открывается в любой из версий MS Word? *
1)Верно
А15)Нажав на какую клавишу можно сделать снимок экрана? *
1)Print Screen
А16)Графические файлы могут иметь расширения … *
1)bmp
5)jpg
6)gif
А17)Расширение видео файлов … *
Выберите несколько верных ответов
2)mov
3)mp4
4)avi
А18)Имя файла состоит из … *
3)имени и расширения
А19)Какие действия можно выполнить с файлом? *
1)копировать
2)создать
4)переименовать