Блюдо№1- Взять мясо, провернуть мясо в мясорубке, взять тесто, закатать мясо в тесто, сварить тесто
Блюдо№2-Взять сыр, взять хлеб, нарезать сыр, нарезать хлеб, положить сыр на хлеб(бутерброт)
Блюдо№3- Взять тесто, поджарить тесто, взять сыр, нарезать сыр, закатать сыр в тесто(блины с сыром)
Ответ:
Все в объяснении
Объяснение:
1.
print(str(a) + '+' + str(b) + '=?') #Выведет: 5+3=?
print(str(a) + '+' + str(b) + '=' + str(a+b)) #Выведет: 5+3=8
2.
print('Z(' + str(a) + ')=F(' + str(b) + ')') #Выведет: Z(5)=F(3)
3.
print('a=' + str(a) + ';b=' + str(b)) Выведет: a=5;b=3
*Мы используем функцию str() из-за того, что конкатенация работает только со строчным типом данных
Var n,a,h,m,s:integer;
begin
writeln('Введите кол-во дней');
read(n);
if n>1 then begin
writeln('В ', n ,' сутках:');
writeln(n*24,' часа');
writeln(n*24*60,' минут');
writeln(n*24*60*60,' секунд')
end;
if n=1 then begin
writeln('В ',n,' дне');
writeln(n*24,' часа');
writeln(n*24*60,' минут');
writeln(n*24*60*60,' секунд');
end;<span>
end.
</span>
var a,a12,a1,a2,a3,s: integer;
begin
readln(a);
a1:=a div 100;
a12:=a mod 100;
a2:=a12 div 10;
a3:=a12 mod 10;
s:=a1+a2+a3;
writeln(s);
end.
a1-первое число трехзначного числа, a2-второе,a3-третье, a12-вторые два числа
<em>// PascalABC.NET 3.3, сборка 1627 от 27.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (a,b):=ReadReal2('Введите два числа:');
if a>b then Writeln('Первое число больше')
else
if b>a then Writeln('Второе число больше')
else Writeln('Числа равны')
end.
<u>Пример</u>
Введите два числа: 25 24.95
Первое число больше