Задать вопрос!

Задать вопрос!

Все категории

3 года назад

13

Решите программу Pascal ABC:Дано натуральное число.Напишите программу, которая проверяет, является ли оно трёхзначным и кратна л

и 7 сумма его цифр.

Информатика

1 ответ:

Anny13mew3 года назад

0 0

Вот решение: -----------

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

Что лишнее: флеш-память, дискета, компакт-диск, процессор; почему?

Федюкин Виктор Се... [14]

Процесор, потому что все выше перечисленные это запоминающие устройства.

0 0

2 года назад

Коля:Двое юношей Петя и Витя играют в следующую игру. Петя говорит Вите три числа a, b и с. Витя, зная, что c=(a⋅x) mod b называ

вераверхорубова

#include <iostream>

using namespace std;

int main() {

int a, b, c;

cin >> a >> b >> c;

for(int i = 0; i <= 1000; i++){

if(a * i % b == c){

cout << i;

return 0;

}

}

cout << 0;

return 0;

}

<h3></h3><h3>Все прошло.</h3>

0 0

4 года назад

Помогите найти площадь кольца, внутренний радиус которого равен r, а внешний - заданному числу R (R>r)

fdgfdgfdg

Площадь круга=пи*R^2
внешний круг=пи*R^2
внутренний=пи*r^2
площадь кольца= пиR^2-пиr^2= пи(R^2-r^2)

0 0

4 года назад

Можно ли элементы следующего списка считать информационными моделями? Если "да", то что для них является объектом моделирования?

Sunshine59

Программа телевидения

0 0

4 года назад

Написать программу для Pascal. Вычислите сумму положительных и кол-во отрицательных чисел на отрезке, концы которого вводятся с

antoshka1998

Var a,b,k1,k2,s:integer;
<span>begin </span>
<span>s:=0; </span>
<span>k1:=0; </span>
<span>writeln('Введите начало и конец отрезка'); </span>
<span>read(a,b); </span>
<span>k2:=b-a+1; </span>
<span>repeat </span>
<span>if b<0 then break; </span>
<span>s:=s+b; </span>
<span>b:=b-1; </span>
<span>inc(k1); </span>
<span>until (b=-1) or (b=a-1); </span>
<span>writeln('Сумма всех целых положительных чисел на отрезке = ',s); </span>
<span>writeln('Количество отрицательных целых чисел = ', k2-k1); </span>
<span>end.</span>

0 0

4 года назад