В PascalABC.Net На 6 строке пишет " Встречено 'a1', а ожидалось ';' "
.
program z1;
var
a,a1,a2,a3,a4,d1,d2: integer;
begin
Read (a)
a1:=d1_div_10;
writeln (a1)

a2:=a_mod_10;

writeln (a2)

a3:=a_mod_10;

writeln (a3)

a4:=a_mod_10;

writeln (a4)

d1:=a_div_10;

d2:=a_div_10

end.

125

351

Посмотреть ответы 1

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

Belka69hfchycv

Информатика

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

#include < stdio.h> #include < stdlib.h> #include < time.h> #include < locale.h> void swap (int *a, int *b) { int temp = *a; *a = *b; *b = temp; } void printarray (int arr[], int n) { int i; for (i = 0; i < n; i++) printf("%3d ", arr[i]); printf("\n"); } void randomize ( int arr[], int n ) { long long x; asm("rdtsc" : "=a"(x)); srand(x); int i; for (i = n - 1; i > 0; { int j = rand() % (i+1); swap(& arr[i], & arr[j]); } } int main() { setlocale(lc_all, "rus"); int a[10] = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}; int b[10] = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}; int c[10]; randomize (a, 10); printf("первый массив: \n"); printarray(a, 10); randomize (b, 10); printf("второй массив: \n"); printarray(b, 10); int i = 0, j = 0; for (i = 0; i < 10; i++) for (j = 0; j < 10; j++) if (a[i] == b[j]) { c[i] = i + j; break; } printf("третий массив: \n"); printarray(c, 10); return 0; }

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

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

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.