Температура в Сыктывкаре в 2011 году
Создается массив A из вещественных чисел (real),
с нумерацией от 1 до 10
(всего 10 элементов).
Var M : array [-5..5] of integer;
Var Z1: array [0..10] of real;
Var Mass : array [-10..10] of string;
Вывод массива
For i:=1 to 10 do
write(A[i]);
A[i] выводится на экран со всеми знаками дробной части – 22.129873698751
A[i] выводится
в шесть символьных
позиций на экране,
две из них дробная часть (точность 0,01);
в третьей позиции справа – точка,
лишние позиции – пробелы _22.13
Задание 2: Изменить предыдущую программу так, чтобы массив T хранил информацию о средней температуре воздуха за каждый месяц года. Вывести на экран среднюю температуру за летние, осенние, зимние и весенние месяцы с точностью 0,01.
Tsred:= (T[12]+T[1]+T[2])/3;
Writeln(‘Средняя тем-ра за зимние месяцы’ , Tsred:6:2);
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть