abroskin2002
?>

1)Чему равно значение а после выполнения программы, если с=205 b=204 Var a, b, c: integer; Begin Read (с, b); If (с>b) or (b mod 2=0) then а:=b+2 else а:=с div 3; Writeln(a); End. 2)Напишите программу решения задачи. Дано число n. Если оно не кратно 3 или равно числу b, то вывести число n, увеличенное на 2, иначе найти 18% от числа b. 3)Напишите программу решения задачи. Дано двузначное число а. Если последняя цифра этого числа больше первой, то вывести число а, уменьшенное на 100.

Информатика

Ответы

Aleksandrovich1075

Задание 2, 3 во вложении

Объяснение:

Задание 1.

Сначала вводятся переменные b и с через пробел.

Мы вводим сначала с, оно равно 205, и затем b, оно равно 204.

затем идет условие.

Если с>b или b mod 2=0

Если 205>204 или

b mod 2=0 - это означает, число b кратно 2, то есть при делении на 2 оно должно дать 0.

В нашем случае 204/2=102 , то есть число 204 кратно 2, оно поделилось на него без остатка.

Первое и второе условие сработало, а значит выполняется следующее:

a:=b+2;

То есть в переменной а мы к b прибавляем 2. И у нас выходит:

a:=204+2=206

Условие иначе у нас не работает, поэтому выводим:

Writeln(a);

Программа выведет число а

206.


1)Чему равно значение а после выполнения программы, если с=205 b=204 Var a,b,c: integer; Begin Read
1)Чему равно значение а после выполнения программы, если с=205 b=204 Var a,b,c: integer; Begin Read
moto-eskort
Задай вопрос из школьного предмета 5-9 Математика 10+5 б есть 2014 одинаковых по виду монет и чашечные весы без гирек среди монет есть одна фальшивая,которая по весу отличается от настоящей предложите определить легче или тяжелее фальшивая монета чем настоящая за наименьшее число взвешиваний Попроси больше объяснений следить Отметить нарушение Ira05060 09.10.2014 ответы и объяснения CVita CVita главный мозг делим все монеты на две равные кучки по 1007 монет и проводим их взвешивание. каждая кучка покажет разный вес. 1007≠1007 (для примера левая легче) теперь из каждой из двух кучек откладываем по одной монете и делим их опять на две равные части по 503 монеты. получаем 4 кучки и 2 монетки. проводим попарное взвешивание. 503=503 503=503 1 монетка≠1 монетка в этом случае берем из любой кучки монетку и взвешиваем с любой из двух монеток. 503≠503 503=503 1=1 значит фальшивая монетка легче 503=503 503≠503 1=1 значит фальшивая монетка тяжелее.
Mark-Petrovich
Задай вопрос из школьного предмета 5-9 Математика 10+5 б есть 2014 одинаковых по виду монет и чашечные весы без гирек среди монет есть одна фальшивая,которая по весу отличается от настоящей предложите определить легче или тяжелее фальшивая монета чем настоящая за наименьшее число взвешиваний Попроси больше объяснений следить Отметить нарушение Ira05060 09.10.2014 ответы и объяснения CVita CVita главный мозг делим все монеты на две равные кучки по 1007 монет и проводим их взвешивание. каждая кучка покажет разный вес. 1007≠1007 (для примера левая легче) теперь из каждой из двух кучек откладываем по одной монете и делим их опять на две равные части по 503 монеты. получаем 4 кучки и 2 монетки. проводим попарное взвешивание. 503=503 503=503 1 монетка≠1 монетка в этом случае берем из любой кучки монетку и взвешиваем с любой из двух монеток. 503≠503 503=503 1=1 значит фальшивая монетка легче 503=503 503≠503 1=1 значит фальшивая монетка тяжелее.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

1)Чему равно значение а после выполнения программы, если с=205 b=204 Var a, b, c: integer; Begin Read (с, b); If (с>b) or (b mod 2=0) then а:=b+2 else а:=с div 3; Writeln(a); End. 2)Напишите программу решения задачи. Дано число n. Если оно не кратно 3 или равно числу b, то вывести число n, увеличенное на 2, иначе найти 18% от числа b. 3)Напишите программу решения задачи. Дано двузначное число а. Если последняя цифра этого числа больше первой, то вывести число а, уменьшенное на 100.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Малыхин Валерьевна621
Yurevna419
gubernatorov00
samuilik-v
oduvanalex
xsmall1
jamaltreid
Shitikov-M.A.1307
Грачева мураховская
YekaterinaAbinskov
info2471
cashuta
kenni19868
ekvld708
Усошина1059