Var a:real;
begin
write ('Введите стоимость 1 пирожка: ');
readln (a);
writeln ('Стоимость 2 пирожков = ',a*2);
writeln ('Стоимость 3 пирожков = ',a*3);
writeln ('Стоимость 4 пирожков = ',a*4);
writeln ('Стоимость 5 пирожков = ',a*5);
writeln ('Стоимость 6 пирожков = ',a*6);
end.
Если нужна программа с n кол-во пирожков, где n вводится с клавиатуры, то вот:
var a,n:real;
begin
write ('Введите стоимость 1 пирожка: ');
readln (a);
write ('Введите кол-во пирожков: ');
readln (n);
writeln ('Стоимость ',n,' пирожков = ',a*n);
end.
Последовательность Фибоначчи образуется так: каждый следующий член равен сумме двух предыдущих(1,1,2,3,5,8,13,,,,)Дано натур. чи
xxx2036
#include <iostream>
using namespace std;
int main()
{
int seqEl[3] = {1, 1, 2};
int n;
cout << "N = ";
cin >> n;
// Вывод первых 3-х членов
cout << seqEl[0] << endl << seqEl[1] << endl << seqEl[2] << endl;
for (int i = 2; i < n; i++)
{
seqEl[0] = seqEl[1];
seqEl[1] = seqEl[2];
seqEl[2] = seqEl[0] + seqEl[1];
cout << seqEl[2] << endl;
}
return 0;
}
1) Коммуникации бывают материальными и информационными.<span>К материальным коммуникациям относятся процессы, которые связаны с передачей каких-либо физических объектов. Например, водные коммуникации, транспортные магистрали, газопроводы и т. п.Информационные коммуникации объединяют процессы, передающие информацию. Это печатные коммуникации, когда общение происходит через книги, журналы, газеты и т. д. Лектории, театры, церкви, концертные залы и пр. определяют аудиторныекоммуникации. Видеокоммуникации – это телевидение, кино, видеофильмы. Аудиокоммуникации связаны с радио, звукозаписями, телефоном. Компьютерные коммуникации – это универсальный вид общения, который обеспечивает передачу информации от текстов до компьютерных программ с помощью носителей (жестких, гибких и лазерных дисков), а также с помощью современных средств связи, включающих компьютеры.3)https://internet-marketings.ru/kak-rabotayut-poiskovye-sistemy/</span>
Program rasst;
<span>var norma, vsego: real; </span>
<span>den: integer; </span>
<span>begin </span>
<span>norma:=10; </span>
<span>vsego:=10; </span>
<span>den:=2; </span>
<span>while den<8 do begin </span>
<span>norma:=1.1*norma; </span>
<span>vsego:=vsego+norma; </span>
<span>den:=den+1 </span>
<span>end; </span>
<span>writeln('Общий пробег=',vsego) </span>
<span>end.</span>