В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
arina050406
arina050406
04.12.2022 09:02 •  Информатика

Решить , это нужно делать в паскале:
1) напишите программу, которая по заданному числу вычисляет его последнюю цифру
2) напишите программу, которая по заданному числу вычисляет его вторую цифру справа
3) напишите программу, которая по заданному числу вычисляет его третью цифру справа
4) напишите программу, которая по заданному числу вычисляет его четвертую цифру справа
5) напишите программу, вычисляющую сумму цифр четырехзначного целого числа
6) напишите программу, вычисляющую сумму цифр пятизначначного целого числа
буду !

Показать ответ
Ответ:
mbilalov
mbilalov
25.02.2022 18:30

Const n=10;

m=15;

Var A :Array[1..n,1..m] of integer;

i: 1..n; //индекс (номер) строки

j: 1..m; //индекс (номер) столбца

count: byte;

Begin

<Инициализация (формирование) массива…>;

<Вывод сформированного массива>;

for j:=1 to m do // для столбца с номером j

begin

count:=0 // до проверки столбца количество искомых элементов равно нулю

for i:=1 to n do

begin

if A[i,j] mod 2 =0 then count:=count+1 // обработка элемента i в столбце j

end; // цикла по i

writeln(′В столбце ′,j, ′четных элементов - ′, count); //вывод результатов обработки столбца j

end; // цикла по i

end.

0,0(0 оценок)
Ответ:
rashas05
rashas05
28.05.2023 08:22

#include "stdafx.h"

#include

using namespace std;

struct complex // структура "хранения" комплексного числа

{ float re; // действительная часть

float im; // мнимая часть

};

void print( char * txt, complex x) // вывод комплексного числа

{

printf("%s=(%f,%fi)", txt, x.re, x.im);

return;

};

complex new_complex(float a, float b) // задать значение комплексному числу

{ complex temp;

temp.re=a;

temp.im=b;

return temp;

};

complex plus_complex(complex a, complex b) // сложить два комплексных чисел

{ complex temp;

temp.re=a.re+b.re;

temp.im=a.im+b.im;

return temp;

}

int main() // простая тестовая программа

{

complex z;

printf( "vvedite re и im 1 chisla: ");

cin > > z.re > > z.im;

print( "z", z); printf("\n");

complex q;

printf( "vvedite re и im 2 chisla: ");

cin > > q.re > > q.im;

print("q", q); printf("\n");

complex sum;

sum=plus_complex(z,q);

print("q+z", sum); printf("\n");

return 0;

}

0

Объяснение:

если не понятно то можешь написать эту

1) полная таблица истинности каждого выражения с пятью переменными содержит 2^5 = 32 строки;

2) в каждой таблице содержится по 4 единицы и по 28 нулей, ( то есть 32-4);

3) выражение a v - b равно нулю тогда, когда a = 0 или b = 1;

4) min количество единиц в таблице истинности выражения a v - b будет тогда, когда там будет наибольшее число нулей, то есть в max количество строк одновременно a = 0 и b = 1;

5) по условию a = 0 в 28 строках, и b = 1 в 4 строках, поэтому выражение a v - b может быть равно нулю не более чем в 4 строках, а оставшиеся 32 – 4 = 28 могут быть равны 1.

ответ: 28.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота