Module Module1 Sub Main() Dim a As String = Console.ReadLine() If (a = "Зима") Then Console.WriteLine("Декабрь (31), Январь (31), Февраль (28-29)") Console.WriteLine("90-91 д.") ElseIf (a = "Весна") Then Console.WriteLine("Март (31), Апрель (30), Май (31)") Console.WriteLine("92 д.") ElseIf (a = "Лето") Then Console.WriteLine("Июнь (30), Июль (31), Август (31)") Console.WriteLine("92 д.") ElseIf (a = "Осень") Then Console.WriteLine("Сентябрь (30), Октябрь (31), Ноябрь (30)") Console.WriteLine("91 д.") End If Console.ReadKey() End Sub End Module
Если на C++, то вот процедуры: если с библиотеки graphics.h x и y нужно передавать левого верхнего угла буквы
#include <graphics.h> #include <stdio.h> #include <conio.h> int x=50,y=50; void M(int x,int y) { // длина буквы 44, высота тоже 44 x+=50; line(x,y,x,y+44); line(x,y,x+22,y+44); line(x+22,y+44,x+44,y); line(x+22,y+44,x+44,y+44); } void I(int x,int y) { // длина буквы 22, высота тоже 44 x+=28; line(x,y,x,y+44); line(x,y+44,x+22,y); line(x+22,y,x+22,y+44); } void R(int x,int y) { // длина буквы 22, высота тоже 44 x+=28; line(x,y,x,y+44); line(x,y,x+22,y); line(x,y+22,x+22,y+22); line(x+22,y,x+22,y+22); }
Module Module1
Sub Main()
Dim a As String = Console.ReadLine()
If (a = "Зима") Then
Console.WriteLine("Декабрь (31), Январь (31), Февраль (28-29)")
Console.WriteLine("90-91 д.")
ElseIf (a = "Весна") Then
Console.WriteLine("Март (31), Апрель (30), Май (31)")
Console.WriteLine("92 д.")
ElseIf (a = "Лето") Then
Console.WriteLine("Июнь (30), Июль (31), Август (31)")
Console.WriteLine("92 д.")
ElseIf (a = "Осень") Then
Console.WriteLine("Сентябрь (30), Октябрь (31), Ноябрь (30)")
Console.WriteLine("91 д.")
End If
Console.ReadKey()
End Sub
End Module
если с библиотеки graphics.h
x и y нужно передавать левого верхнего угла буквы
#include <graphics.h>
#include <stdio.h>
#include <conio.h>
int x=50,y=50;
void M(int x,int y)
{ // длина буквы 44, высота тоже 44
x+=50;
line(x,y,x,y+44);
line(x,y,x+22,y+44);
line(x+22,y+44,x+44,y);
line(x+22,y+44,x+44,y+44);
}
void I(int x,int y)
{ // длина буквы 22, высота тоже 44
x+=28;
line(x,y,x,y+44);
line(x,y+44,x+22,y);
line(x+22,y,x+22,y+44);
}
void R(int x,int y)
{ // длина буквы 22, высота тоже 44
x+=28;
line(x,y,x,y+44);
line(x,y,x+22,y);
line(x,y+22,x+22,y+22);
line(x+22,y,x+22,y+22);
}
main()
{
initwindow(800,600);
M(x,y); I(x,y); R(x,y);
x=50;y=100;
R(x,y); I(x,y); M(x,y);
x=50;y=150;
M(x,y); I(x,y); M(x,y);
getch();
closegraph();
}
P.S. я старался