Напечатать числа следующим образом в Pascal
10-11 класс
|
21 19.2
20 18.2
...
10 8.2
uses crt;
var i:integer;
begin
for i:=21 downto 10 do
writeln(i,' ',i-1.8);
end.
Другие вопросы из категории
отрицательными.На Turbo Pascal пожалуйста срочно!!!!!Зарвнее спасибо!
двух цифр после запятой
2.В чем заключается принцип организации диалога "компьютер-пользователь" с помощью меню?
Помогите,пожалуйста! Заранее огромное спасибо)
Читайте также
ПРИПИШИТЕ ДВЕ ЦИФРЫ МЕСЯЦА(НАПРИМЕР,ДЛЯ ДАТЫ 02.03.93 ИСКОМОЕ ЧИСЛО 203)ЕСЛИ ДЕНЬ В ДАТЕ РОЖДЕНИЯ-ЧИСЛО ОТ 10 ДО 31,ТО К ДВУМ ЦИФРАМ ИЗ ОБОЗНАЧЕНИЯ ДНЯ ПРИПИШИТЕ ВТОРУЮ ЦИФРУ ИЗ ОБОЗНАЧЕНИЯ МЕСЯЦА(НАПРИМЕР,ДЛЯ ДАТЫ 23.11.93 ИСКОМОЕ ЧИСЛО 231) мОЯ ДАТА РОЖДЕНИЯ 30.05.95
2.n-1
3.n-2
....
n1.
A1 = 1, A2 = 2, AN = (AN–2+ AN–1)/2, N = 3, 4, ... Найти первый из номеров K, для которых выполняется условие |AK AK–1| < D, и вывести этот номер, а также числа AK–1 и AK.
Если не трудно, то пожалуйста с комментариями/обьяснениями!
монеты только весом. Для определения фальшивой монеты он пронумеровал монеты числами от 1 до 12 и провел три взвешивания на рычажных весах. Обозначив через Vi – вес монеты с номером i, он записал результаты взвешиваний следующим образом: V2 + V4 + V5 + V6< V3 + V7 + V8 + V9; V1 + V2 + V3 + V5> V4 + V6 + V10 + V11; V1 + V4 + V7 + V10>V5 + V6 + V9+ V12. Найдите фальшивую монету.
1 1 1
2 4 8
3 9 27
----------------
10 100 1000