Задачки паскаль, помогите пожалуйста кто.1, Напишите программу, реализующую последующие
Задачки паскаль, помогите пожалуйста кто.
1, Напишите программу, реализующую последующие вычисления. Дан номер месяца целое число в спектре 112, введенное с клавиатуры (1 январь, 2 февраль и т. д.). Вывести название подходящего времени года (зима, весна, лето, осень).
2, Напишите программку, реализующую последующие вычисления. Дана матрица размера M x N (числа вводятся с клавиатуры). Для каждого столбца матрицы отыскать творение его элементов. Полученные значения вывести в текстовый файл.
3, Напишите программку с использованием функции CircleS(R) вещественного типа, находящей площадь круга радиуса R (R вещественное). С подмогою этой функции найти площади 3-х кругов с данными радиусами. Площадь круга радиуса R рассчитывается по формуле S = R2.
4, Напишите программу, реализующую следующие вычисления. Дано целое число N (1N26), введенное с клавиатуры. Вывести N первых прописных (то есть больших) букв латинского алфавита.
Задать свой вопрос
1.
var n:integer;
begin
repeat
writeln('Введите номер месяца [1..12]');
readln(n); until n in[1..12];
case n of
1:writeln('January');
2:writeln('February');
3:writeln('March');
4:writeln('April');
5:writeln('May');
6:writeln('June');
7:writeln('July');
8:writeln('August');
9:writeln('September');
10:writeln('October');
11:writeln('November');
12:writeln('December');
end;
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Физика.
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.