ПРЕЗЕНТАЦИЯ К УРОКУ
ИГРАЕМ И ПОВТОРЯЕМ
ДЕЙСТВИЯ НАД ЭЛЕМЕНТАМИ МАССИВА. ПОМОЩЬ
var d:array[1..8] of real;
i:integer;
begin
writeln(‘Введите диагонали 8 мониторов:’);
for i:=1 to 8 do readln(d[...]);
for i:=1 to 8 do d[i]:=d[...]...;
writeln(‘Диагонали 8 мониторов в сантиметрах:’);
for i:=1 to 8 do writeln(d[...]);
end.
ПРАКТИЧЕСКАЯ ЧАСТЬ
Задание 1. Запускаем среду программирования PascalABC.NET. Ярлык вы найдёте на Рабочем столе или в меню Пуск Обратите внимание на чёрные буквы net в правом нижнем углу значка.
Задание 2. Наберите и выполните программу, которую составляли в классе.
Задание 3. В массиве хранятся данные о температуре в градусах Цельсия. Составьте программу перевода этих значений в градусы Фаренгейта по формуле: t °F = t °C *1,8 + 32
Задание 4. После 19.00 павильон возле школы решил делать 60% скидки на булочки. В ларьке продаётся 7 видов булочек. Стоимость товара до скидки вводится с клавиатуры. Выведите стоимость товара со скидкой.
Задание 5. Ребята ходили на репетиционное тестирование. Некоторые получили 100 баллов. Те, кто получил меньше 85, решили больше времени уделить подготовке, и в следующий раз набрали на 15 баллов больше, кто от 85 до 95 увеличили результат на 5, а 100-балльники удержали свои позиции.
Составьте программу, которая запрашивает количество детей, сдававших РТ, их баллы на первом РТ и выводит на экран номер учащегося и его балл на втором РТ.
Комментариев нет:
Отправить комментарий