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

Август 28, 2022

Главная
Информатика
Программирование задач с ветвлением

Содержание

4. При 1) B=5 2) B=12 3) B=10 ?
5. X Y -2 2 X X2+Y2=22 Y=-X X=-2
6. Задачи: Определить, является ли целое число N четным двузначным числом Определить, является ли треугольник со сторонами
7. 4. Определить правильность даты, введённой с клавиатуры (число – от 1 до 31, месяц – от
8. нач Ввод a, b, c D D=b2-4ac Нет решений D=0 X= X1= X2= Вывод X Вывод
9. program ugadaika; uses crt; var x, y: integer; label a1; begin clrscr; randomize; y:=random(11); a1: readln
12. Скачать презентацию

Слайд 2

Слайд 3

Слайд 4

При
1) B=5
2) B=12
3) B=10
?

Слайд 5

X
Y
-2
2
X
X2+Y2=22
Y=-X
X=-2

Слайд 6

Задачи:
Определить, является ли целое число N четным двузначным числом
Определить, является ли

треугольник со сторонами a, b, c равнобедренным
Заданы размеры A, B прямоугольного отверстия и размеры X, Y, Z кирпича. Определить, пройдет ли кирпич через отверстие.

Слайд 7

4. Определить правильность даты, введённой с клавиатуры (число – от 1

до 31, месяц – от 1 до 12). Если введены некорректные данные, то сообщить об этом.
5. Услуги телефонной сети оплачиваются по правилу: за разговоры до A мин в месяц оплачиваются B р., а разговоры сверх установленной нормы оплачиваются из расчета C р. в минуту. Написать программу, вычисляющую плату за пользование телефоном для введенного времени разговоров за месяц.

Слайд 8

нач
Ввод a, b, c
D<0
D=b2-4ac
Нет решений
D=0
X=
X1=
X2=
Вывод X
Вывод X1, X2
кон
нет
да
да
нет (D≥0)

Слайд 9

program ugadaika;
uses crt;
var x, y: integer;
label a1;
begin
clrscr;
randomize;
y:=random(11);
a1: readln (x);
if x=y then

writeln ('ugadano')
else
begin
if x goto a1;
end;
end.

Слайд 10