Главная страница | Контакты | Случайная страница Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Листинг работы

Program primer3;

Var A:integer;

Begin

Writeln(‘введите возраст’)

Readln(a);

CASE A of

1,21,31,41,51,61,71,81,91:writeln(‘год’);

2..4,22..24,32..34,42..44,52..54,62..64,72..74,82..84,92..94:writeln(‘’);

5..20,25..30,35..40,45..50,55..60,65..70,75..80,85..90,95..99:writeln(‘’);

ELSE writeln(‘ошибка’)

Writeln(‘Программу составила Зарипова Ирина Булатовна − студентка группы КС-111’);

end.

Протокол работы

Вводимое число а;

Вводите значение переменных;

Вывод на экране год, года, лет.

Ручной расчет

1,21,31,41,51,61,71,81,91:writeln(‘год’);

2..4,22..24,32..34,42..44,52..54,62..64,72..74,82..84,92..94:writeln(‘’);

5..20,25..30,35..40,45..50,55..60,65..70,75..80,85..90,95..99:writeln(‘’);

Линейные 1.

Задача 2.1

Дано вещественное а, пользуясь только операцией умножения и командой присвоения получить:

1. за 2 операции;

Список используемых переменных

а − вводимое число а;

b − дополнительная переменная;

c − дополнительная;

Алгоритм решения задачи

1. Ввод числа а

2. Вывод операций на экран

Рис.4− Блок схема алгоритма

Листинг программы

Program primer4;

Var a,b,c:real;

Begin

Write(‘a=’);

Readln(a);

b:=a*a;

write(‘b=’,b:4:2);

c:=b*b;

write(‘c=’,c:4:2);

readln;

end.

Протокол работы программы

Ввести переменную а

Вывод на экран значения a и b

Ручной расчет

b:=a*a=b:4:2;

c:=b*b=c:4:2.