Вопрос по информатике:
Помогите, пожалуйста, написать программу на Паскале!!!! Срочно.
Вариант 3
Пожаловаться
- 15.08.2015 09:49
- Информатика
- remove_red_eye 16141
- thumb_up 48
Ответы и объяснения 1
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
№1
begin
Writeln(' a b x z');
foreach var a in 0.55.Step(0.55).TakeWhile(t->t<=5.5) do begin
var b:=a<=2?a/2:2*a;
var x:=a+0.3;
var z:=a*Sin(x)+b*Cos(x);
Writeln(a:4:2,b:8:2,x:8:2,z:12:6)
end
end.
№2
begin
var a:=new string[4](' *',' * *',' * *','* *');
(a+a[:4].Reverse).PrintLines
end.
Внимание! Если программа не работает, обновите версию!
№1
begin
Writeln(' a b x z');
foreach var a in 0.55.Step(0.55).TakeWhile(t->t<=5.5) do begin
var b:=a<=2?a/2:2*a;
var x:=a+0.3;
var z:=a*Sin(x)+b*Cos(x);
Writeln(a:4:2,b:8:2,x:8:2,z:12:6)
end
end.
№2
begin
var a:=new string[4](' *',' * *',' * *','* *');
(a+a[:4].Reverse).PrintLines
end.
Пожаловаться
- 16.08.2015 13:26
- thumb_up 6
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы